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EARTH  TER>IINAL  MEASUREMENT  SYSTEM 


OPERATIONS 


MANTJAL 


David  F. 


Wait 


The  Earth  Terininal  Measurement  System  (ETMS)  was  developed  by 
the  National  Bureau  of  Standards  to  make  accurate  measurements  of 
earth  terminal  and  satellite  parameters  such  as  figure  of  merit 
(G/T),  antenna  gain  relative  to  a  reproducible  reference  level, 
satellite  effective  isotropic  radiated  power   (EIRP) ,  and  ratio  of 
carrier  power  to  the  operating  noise  temperature  (C/kT) .  Because 
of  difficulties  of  using  the  standard  earth  terminal  parameters  to 
precisely  characterize  the  earth  terminal,   the  parameters  noise 
equivalent  flux  (NEF)  and  noise  ulterior  flux  (NTJF)  are  introduced. 
NEF  characterizes  the  earth  terminal  hardware,   and  it  is  defined  so 
that  it  is  largely  independent  of  frequency  and  antenna  elevation 
angle.     Thus,   it  is  easier  to  evaluate  the  "reasonableness"  of  a 
particular  set  of  results  in  light  of  the  other  results  taken  at 
various  frequencies  and  elevation  angles.     This  manual  includes  the 
theory  of  the  measurem.ents ,  measurement  procedures,  measurement 
troubleshooting,  interpretation  of  the  results,  and  a  discussion  of 
the  ETMS  software. 

Key  words:     Earth  terminal;  effective  isotropic  radiated  power; 
figure  of  merit;  measurement  procedure;  noise  temperature;  satel- 
lite communication. 


This  manual  describes  the  operation  of  the  earth  terminal  measurement 
system  (ETMS).     It  includes  the  theory  of  the  measurem.ents  that  are  implemented 
on  the  ETMS,   the  measurement  procedures,   the  m.easurement  troubleshooting,  the 
interpretation  of  the  results,  and  a  discussion  of  the  ETMS  softX'7are.  This 
manual  does  not  include  details  on  connecting  the  hardware,   on  hardvrare  mainten- 
ance, or  on  hardware  troubleshooting.     These  topics  are  discussed  in  the  compan- 
ion ETI'IS  maintenance  manual  [7]. 


The  radio  star  Cassiopeia  A  (Cas  A)   is  used  as  a  calibration  source   [1]  for 
the  measurements  described  in  this  report. 


1. 


INTRODUCTION 


2.  BACKGROUND 


~  2.1    G/T  and  G/T 

 a 

To  determine  G/T,   the  ratio  (Y)  of  the  output  noise  power  when 
the  earth  terminal  antenna  is  pointed  to  Gas  A  to  the  output  noise  power  when 
the  antenna  is  pointed  to  the  nearby  cold  sky  is  measured. 


-  Y  =  (AT^      +  T)/T  ,  (1) 
where  AT        is  the  temperature  rise  due  to  Gas  A  at  the  antenna  output  port,  and 

L<3.  S 

T  is  the  system  temperature  expressed  relative  to  the  antenna  output  port.  The 

temperature  of  the  cold  sky  is  included  in  T.     The  temperature  rise  caused  by 

2 

the  star  depends  on  the  flux  density  of  Gas  A,  S       (W/m  /Hz)   [2],  and  on  the 

2  Cas 

effective  area  of  the  antenna  A     (m  ) , 

where  S        =  (3154)e  ^''^^^''^  (f /1000)°'xlO~^^,  x  =  the  number  of  years  9ince 

1965.0,  a  =  -0.792  +  0.0012t,  f  is  the  frequency  (Hz),  k  is  Boltzmann's  con- 

-23 

stapt,   (k  =  1.38046  x  10      J/K) .     The  various  k^'s  are  defined  by  Daywitt  [3], 
k^  is  the  atmospheric  transmission  correction  factor,  k2  is  the  star  shape 
correction  factor,  k^  is  the  bandwidth  correction  factor,  k^  is  the  differential 
system  temperature  factor,  k^  is  the  antenna  pointing  correction  factor,  is 
the  polarization  factor,  and  k^  is  the  system  response  correction  factor.  The 
factor  1/2  in  eq.   (2)  accounts  for  the  fact  that  only  one  polarization  of  radia- 
tion can  be  received  from  a  star  at  any  one  time.     If  the  antenna  is  reciprocal, 
then  ■       ■  ' 

■    .      .       \.;   ■  "       A^      c^G/(47rf^)  ^3) 

where  G  is  the  antenna  gain,  c  is  the  velocity  of  light  (2.99793  x  10    ra/s),  f 

is  the  frequency  (Hz),  so  ' 

■  AT_      =  G 

Gas  Gas 


2 


where  ?  =  k^k^-'-k^        S/(8^kf^)    .  (5) 

For  the  measurements  included  in  this  report,  power  is  measured  relative  to  a 
stable  and  reproducible  noise  add  reference  signal,  T  ,  so 

Si 


Combining  eqs.    (1)  and  (4) 

G/T  =  (Y-l)/C  (7) 
or  expressed  in  decibels  above  one  inverse  degree  kelvin, 


G/T  (dB/K)  =  10  log^Q  G/T   .  (8) 

2 . 2    Noise  Equivalent  Flux  and  Noise  Ulterior  Flux 

The  figure  of  merit  (G/T)  for  an  earth  terminal  has  several  shortcomings 
for  the  precise  characterization  of  an  earth  terminal.     First,  it  neither 
characterizes  the  hardware,  nor  the  hardware  plus  atmosphere,  because  the 
atmospheric  effects  are  excluded  from  the  antenna  gain  (G).  part  of  G/T,  but  are 
included  in  the  system  temperature  part.     Secondly,  the  noise  performance  of 
subcomponents  of  an  earth  terminal  is  characterized  in  terms  of  an  effective 
noise  temperative  (or  noise  figure)  and  a  gain/loss  which  obey  familiar  rules  of 
combination.     In  contrast  G/T  has  more  complex  combinational  rules  which  are 
sometimes  confused  with  the  more  familiar  rules. 

Thirdly,  earth  terminal  noise  characteristics  and  efficiency  are  largely 
independent  of  frequency  while  G/T  is  a  function  of  frequency  squared.     Thus,  if 
an  earth  terminal  is  being  characterized  at  several  different  frequencies,  it 
becomes  somewhat  more  difficult  to  identify  an  abnormal  measurement  when  using 
G/T  as  opposed  to  the  use  of  a  parameter  that  is  not  frequency-dependent. 
Lastly,  inclusion  of  the  atmospheric  component  in  G/T  makes  it  very  difficult  to 
determine  the  "reasonableness"  of  a  set  of  results.     That  is,  with  small  sets  of 
data  it  is  important  to  be  able  to  judge  whether  the  end  points  are  valid.  A 
reasonable  change  in  hardware  characteristics  is  much  easier  to  estimate  than 
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changes  in  hardware  plus  atmospheric  effects.  To  avoid  the  above  problems,  the 
parameters  Noise  Equivalent  Flux  (NEF)  and  Noise  Ulterior  Flux  (NUF)  are  intro- 
duced . 

The  Noise  Equivalent  Flux  (NEF)  density  is  a  measure  of  the  noise  perform- 
ance of  the  earth  terminal  analogous  to  effective  input  noise  temperature  for  an 

-2  -1 

amplifier.     NEF  is  the  ideal  white,  random  noise  flux  density  (wm    Hz     )  inci- 
dent normal  to  the  aperture  of  a  noiseless  equivalent  earth  terminal  such  that 
the  output  noise  power  equals  the  output  noise  power  of  the  actual  earth  termin- 
al.    In  terms  of  NEF,   the  Y-factor  (eq.   1)  is 

Y  =  (k  •••k^  S        +  kT  ,    /A      +  NEF)/(kT  .    /A      +  NEF)  (9) 
1        7     cas  sky    eo  sky    eo  ^  ^ 

where  k  •••k  ,   S       ,  and  k  are  defined  as  in  eq ,    (2),  T  ,      is  the  noise  power 

J-         /       CSS  Stcy 

originating  from  the  atmospheric  losses  along  the  antenna  boresight,  plus  the 
three-degree  kelvin  cosmic  background  temperature,  and  A^^  is  the  antenna  effec- 
tive area  at  the  antenna  aperture  (i.e.,  no  resistive  antenna  losses  included). 
Boltzmann's  constant,  k,  and  the  antenna  effective  area,  A     ,  are  used  to  convert 
'^sky  ^°  ^  power  density  expressed  in  watts/meter   .     Rearranging  eq .  (9), 

NEF  =  k.k_...k_  S/(Y-1)  -  kT  ,    /A       .  (10) 
.    ,    ^  12        7  sky  eo 

If  the  atmosphere  is  included  as  part  of  the  earth  terminal,  the  corresponding 
noise  equivalent  flux  is  denoted  NUF,  or  the  noise  ulterior  flux  density  to 
emphasize  that  the  input  reference  plane  to  the  earth  terminal  is  beyond  the 
upper  atmosphere. 

NUF  =  k„---k^  S/(Y-1)  -  kT        /A  (11) 
z        7  cosm  eo 

where  T  is  the  3K  cosmic  background  temperature,  and  no  atmospheric  absorp- 

cosm 

tion  factor  k^^,  occurs. 

2.3  EIRP 

To  measure  satellite  power,  note  that  the  power  change,   C,    (watts)  due 
to  the  carrier  power  at  frequency  f^  at  the  output  port  of  the  antenna  is 
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C  =  W  A 
o  e 


(12) 


2 

where  W     (W/m  )  is  the  flux  incident  on  the  antenna.     The  flux  incident  on  the 
o 

antenna  depends  on  the  effective  isotropic  radiated  power  (EIRP)  from  the  satel- 
lite and  on  the  slant  distance  from  the  satellite  to  the  earth  terminal  antenna, 
d(m), 

W    =  k'   kl  kl  k'   k'  k'   k;  EIRP'/(4Trd^)  (13) 
o         L     A     6     h     D     b  1 

where  the  k!^  correction  factors  are  similar  to  those  in  eq.    (2)  and  are  des- 
cribed by  Daywitt   [4],  and  the  prime  on  EIRP'   is  a  reminder  that  the  EIRP 
depends  on  the  angle  between  the  boresight  direction  of  the  satellite  antenna 
and  the  direction  to  the  earth  terminal.     This  difference  in  boresight  EIRP 
and  EIRP'   is  an  antenna  pointing  correction  factor  known  as  the  tilt  differential. 
Rewriting  eq.    (13)  using  eqs.    (3)  and  (12), 

EIRP  =  L(C/G)/   (kj...kp  (14) 
2 

where  the  space  loss  L  -     (4TTdf/c)    .     For  measurements  in  this  report,  powers 

are  measured  relative  to  a  noise  add  reference,   T  ,  hence,   C  =  kT  B[y  -h{y  +y , ) ] 

Si  3.         O  T 

and 

EIRP'  =  LkB[y  -1/2 (y_+y  ) ] /{ (G/T  )  k'-.-kL}  (15) 

O  ~T~  3         J-  / 

where  k  is  Boltzmann's  constant,  B  is  the  receive  noise  bandwidth  of  the  Earth 
Terminal  Measuring  System  (ETMS),  y^  is  the  power  relative  to  the  noise  add 
power  when  f^  is  centered  in  the  measurement  pass  band,  y_  is  the  power  relative 
to  the  noise  add  power  when  the  frequency  of  the  band  pass  is  lowered  so  that 
none  of  the  f^  power  is  in  the  measurement  pass  band,  and        is  the  power  rela- 
tive to  the  noise  add  power  when  the  measurement  band  pass  is  just  above  f^. 

2.4  C/kT 

The  measurement  of  C/kT  (ratio  of  carrier  power  to  the  operating  noise 
temperature  per  hertz)  differs  from  the  other  measurements  in  this  report  in 
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that  no  flux  standard  such  as  Cas  A  is  required.     Traditionally,  there  is 
accepted  ambiguity  between  the  parameters  G/T  and  C/kT  in  that  the  symbol  T  is 
used  differently.     The  T  in  G/T  refers  to  the  noise  of  only  the  earth  terminal 
and  is  called  the  system  noise  temperature  (SNT) ,  while  the  T  in  C/kT  refers  to 
the  operating  noise  temperature  (ONT)  of  both  the  earth  terminal  and  the  noise 
being  broadcast  by  the  satellite.     In  terms  of  the  symbols  in  eqs .   (14).  and  (15) 


C/kT  = 


.1 


l/2(y_+y^) 


(16) 


2.5    Estimate  of  T    Using  Moon  Measurements 

The  moon  is  an  extended  source  (large  relative  to  the  antenna  beamwidth) 
for  an  AN/FSC-78  or  AN/MSC-60  earth  terminal.     The  temperature  rise  in  the 
antenna  output  due  to  the  moon  is  the  physical  temperature  of  the  moon  dimin- 
ished by  the  losses  which  occur  between  the  moon  and  the  antenna  output  port. 

'  =  k^   n     ,  n,      (T  -  T        )  (17) 

moon        1    rad    bm      moon        cosm  ^-^'^ 

where  k,   is  the  atmospheric  loss,  n     ,  is  the  radiation  efficiency  of  the 
1  ^  rad 

antenna,  and  is  the  fraction  of  the  antenna  radiation  pattern  which  "sees" 

bm 

the  moon.     To  the  extent  that  the  right  hand  parameters  in  eq.   (17)  are  known, 

the  moon  provides  a  signal  of  known  amplitude  in  the  earth  terminal  which  can  be 

used  to  calibrate  T  ,  and  thus  antenna  gain. 

a  ° 

"'                   2.6    Estimate  of  T    Using  Antenna  HPBW 
^   a  

The  calculation  of  T    from  HPBW  in  the  REWORK  program  involves  several 

a 

steps.     First,  the  measured  antenna  HPBW  and  G/T^  are  least  squares  fit  to  a 

constant  plus  cosecant  of  the  antenna  elevation  term.     The  zenith  fit  values  for 

G/T    and  HPBW  are  used  for  the  subsequent  calculations  for  T  .     The  zenith  HPBW 
a  a 

value  is  corrected  for  the  effect  caused  by  the  finite  size  of  Cas  A.  Then  the 
antenna  gain,  G,  is  calculated  using  the  following  empirical  equations  relating 
aperture  efficiency,  n      ,  HPBW(min),  antenna  diameter (ft) ,  D,  and  G. 

n        =n     ^/(HPBWxDxF/3035)^  ^^^^ 
apr  rad 
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where  n     ,  is  the  radiation  efficiency  (assumed  to  be  0.98),  and  F  is  the 
rad 

frequency  in  gigahertz. 

G  -  n,^^  (DF/0..313)^  .  (19) 

Using  the  zenith  value  for  G/T  ,  and  the  empirical  value  for  G,  the  magnitude  of 

T    is  calculated, 
a 

3.     MEASUREMENT  INSTRUMENTATION 

The  measurement  of  the  pertinent  power  ratios  is  accomplished  using  the 
Earth  Terminal  Measurement  System  (ETMS).     The  ETMS  is  an  automated  measurement 
system  developed  around  the  most  accurate  power  measurement  bridge  known — the 
NBS  type  IV  self -balancing  bridge  [5].     This  bridge  as  implemented  in  the  ETMS 
measures  the  ratio  of  stable  noise  powers  to  an  accuracy  of  less  than  ±0.1%. 

A  simplified  block  diagram  of  the  ETMS  is  shown  in  figure  1.     The  ETMS 
contains  eight  subsystems:     (1)  a  calculator  which  provides  computation  capabil- 
ity, a  means  of  controlling  each  of  the  remaining  subsystems  under  automatic 
sequence  control,  a  means  of  storing  the  measurement  results  on  magnetic  tape  in 
order  to  rework  the  data  at  a  later  time,  and  a  keyboard  to  control  the  measure- 
ment procedures  or  to  enter  program  modifications;   (2)  an  NBS  type  IV  self- 
balancing  power  bridge  used  to  measure  noise  power;   (3)  a  programmable  voltmeter 
whose  accuracy  is  a  major  factor  in  determining  the  accuracy  with  which  the 
noise  power  is  measured;   (4)  a  multiplexer  which  connects  the  digital  voltmeter 
to  various  measurement  points  of  interest;   (5)  a  digital  clock  needed  to  provide 
time  information  required  to  determine  current  star  coordinates;   (6)  dual  X-band 
solid  state  noise  source  to  provide  a  stable  reference  signal  needed  to  elimin- 
ate the  effects  of  gain  fluctuations  in  the  earth  terminal;   (7)  an  external 
cassette  which  allows  redundant  recording  of  measurement  data;  and  (8)  an  rf 
control  unit  which  provides  signal  conditioning,  system  test  signals,  precision 
programmable  attenuators,  signal  monitoring,  alarm  circuits,  and  interface 
circuits  which  allow  the  calculator  to  control  the  various  measuring  instru- 
ments. 
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4.     OVERVIEW  OF  MEASUREMENT  PROCEDURES 

The  measurement  procedure  can  vary  with  the  measurement  to  be  performed,  so 
different  procedures  will  be  discussed  separately. 

4.1    G/T,  G/T  ,  NEF,  and  NUF  Procedure 

Si 

The  G/T,  G/T  ,  NEF,  and  NUF  are  measured  in  the  same  procedure.  Antenna 

3. 

gain  is  not  measured  directly  because  there  is  no  access  to  the  antenna  output 
port.     The  output  level  of  the  reference  noise  source  is  calibrated  but  the 
signal  which  is  coupled  into  the  front  end  of  the  earth  terminal  and  referred  to 
as  the  noise  add  signal,  T  ,   is  not  known  accurately  because  the  coupling  coef- 
ficient  of  the  directional  coupler  is  unknown.     The  magnitude  of  T^  is  known 
approximately  from  antenna  HPBW  and  moon  measurements. 

The  measurement  procedure  contains  seven  steps.     First ,  prior  to  arriving 
at  the  measurement  site,   the  date  of  the  measurement,   the  earth  terminal's  site 
coordinates,  antenna  diameter,  aperture  efficiency,  radiation  efficiency,  oper- 
ating frequency,  bandwidth,  and  approximate  G/T  are  entered  into  the  computer 
program,  and  the  expected  measurement  errors  are  printed,   the  star  positions 
versus  time  are  plotted,  and  the  resulting  data  are  stored  onto  a  data  cassette 
to  be  used  at  the  measurement  site.     Using  this  information,   the  on-site  measure- 
ment schedule  is  planned.     The  second  measurement  step  is  at  the  measurement 
site.     The  reference  noise  source  is  connected  to  the  directional  coupler  in  the 
antenna  room,  and  the  output  from  one  of  the  earth  terminal  down  converters  is 
connected  to  the  ETMS.     A  system  check  and  an  earth  terminal  system  stability 
check  is  then  performed.     Thirdly,  offset  corrections  for  the  antenna  pointing 
are  determined,  and  sky  profiles  (sky  temperature  versus  antenna  elevation  along 
the  star  trajectory)  are  established.     The  fourth  step,  measurement  data  for 

G/T,  G/T  ,  NEF,  and  NUF  is  taken.     A  measurement  set  contains  six  cuts.     For  a 
a 

cut,  the  antenna  is  pointed  to  a  computed  coordinate  position;   then  a  string  of 
power  measurements  (typically  30)  relative  to  the  noise  add  signal  are  taken 
6  seconds  apart.     One  cut  is  taken  on  the  cold  sky  about  2  degrees  away 
(in  declination)   from  Gas  A.     The  remaining  cuts  are  spaced  equidistant 
throughout  the  main  beam  of  the  antenna  pattern,  and  selected  data  points 
are  least  squares  fit  to  a  two-dimensional  parabolic  curve.     The  parabolic 
curve  fit  is  used  because  it  is  the  fit  that  requires  the  least  computation 
time  and  computer  memory  yet  still  provides  the  needed  antenna 
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pointing  correction  information.     The  data  are  stored  and  G/T,  G/T  ,  NEF,  NUF 

3. 

antenna  half  power  beamwidths  (HPBW) ,  and  updated  antenna  point  offsets  are 
calculated  and  printed  out. 

The  fifth  step  of  the  procedure  is  the  first  level  rework  of  the  data. 
Each  set  of  data  (which  consists  of  6  cuts)  is  refit  to  a  two-dimensional 
gaussian  curve,  and  the  resulting  G/T,  G/T  ,  NEF,  NUF,  and  HPBW  for  each  set  are 

3. 

plotted  as  a  function  of  antenna  elevation.     The  gaussian  curve  fit  is  much 
slower  than  the  parabolic  fit,  but  it  is  a  better  approximation  to  the  true 
curve  shape.     The  gaussian  curve  can  be  used  to  fit  the  entire  drift  curve  and 
thus  allows  a  direct  measurement  of  the  relative  temperature  change  caused  by 
the  star,  AT      /T  ,  without  depending  on  sky  profile  measurements  made  at  a 

C  3.S  3. 

different  time.     This  direct  measurement  of  AT      /T    using  gaussian  curve 

C3  S  3 

fitting  is  immune  from  errors  caused  by  tlirectional  dependent  interference 
sources.     The  sixth  step  is  to  use  the  results  of  the  first  level  rework  to 
readjust  the  computation  parameters  and  then  to  perform  a  second  level  rework. 
The  seventh  step  is  to  delete  any  bad  measurement  sets  and  perform  a  third  level 
rework  which  plots  the  results  for  the  remaining  measurement  sets.    The  eighth 
and  last  step  is  to  take  the  results  from  the  last  data  rework  and  to  enter  them 
into  the  program  used  in  step  one  which  lists  all  the  program  assumptions  and 
the  resulting  errors.     The  purpose  for  step  seven  is  to  reexamine  the  assumption 
and  to  record  explicitly  the  conditions  of  the  measurement. 

'   '  "      -  ■  -  2    EIRP  Procedure 

The  EIRP  of  a  specific  frequency  from  a  satellite  is  measured  in  three 
steps.     The  first  step  is  to  measure  G/T^  as  a  function  of  antenna  elevation  as 
described  in  section  4.1.     Secondly,  a  narrowband  filter  in  the  ETMS  is  selected 
and  the  power  out  of  the  earth  terminal  patch  board  is  measured  both  in  milli- 
watts and  relative  to  the  noise  add  reference  for  four  situations:     (1)  the 
antenna  pointed  to  the  cold  sky  near  the  satellite,   (2)  the  antenna  pointed  at 
the  satellite  and  the  earth  terminal  down- converter  tuned  to  the  satellite 
frequency  of  interest,  f^,   (3)  same  as  (2)  except  the  down-converter  tuned  to 
the  noise  floor  at  a  frequency  just  below  f^,  and  (4)  same  as  (3)  except  at  a 
frequency  just  above  f ^ .     The  EIRP  is  calculated  using  eq.   (15).     For  each 
measurement  situation,  repeated  measurements  are  taken  to  obtain  a  sense  of  the 
repeatability  of  the  power  level. 
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4.3    C/kT  Procedure 

C/kT  is  measured  at  the  same  time  as  EIRP,  but  also  may  be  measured  sep- 
arately.    The  first  step  in  the  EIRP  is  not  used  for  the  C/kT  measurement  but 
the  last  two  steps  are  used,  and  the  results  of  the  power  measurements  are 
entered  into  eq.    (16)  for  the  calculation. 

5.     OVERVIEW  OF  THE  COMPUTER  CASSETTE  TAPES 

The  ETMS  has  eight  computer  tapes,    (1)  the  equipment  check  (EQUIP  CHECK) 
tape,   (2)  the  site  preparation  program  tape  (SITE  PREP),   (3)  the  measurement 
program  tape  (MEAS),   (A)  the  summary  tape,    (5)  the  rework  program  tape  (REWORK), 
(6)  the  comments  tape  one  which  includes  the  list  of  simple  computer  variables 
and  meanings,   (7)  the  comment  tape  two  containing  the  program  matrix  variables 
and  meanings,   (8)  the  comment  tape  three  containing  the  special  functions  and 
meanings. 

The  major  programs  EQUIP  CHECK,  SITE  PREP,  MEAS,  and  REWORK  can  be  loaded 
using  a  single  cassette  tape  for  each.     This  is  made  possible  by  duplicating 
certain  files. 

On  the  first  three  tapes  each  contain  an  identical  file  of  subroutines, 
denoted  as  program  "X."    The  rework  tape  also  contains  many  of  the  same  sub- 
routines found  in  "X."    Three  tapes,   SITE  PREP,  MEAS,  and  REWORK  each  contain 
star,  site,  and  equipment  characteristics  information  filed  in  the  matrices  S, 
T,  and  N.     The  EQUIP  CHECK  tape  contains  the  matrix  N  file.     Three  tapes  contain 
very  similar  files  denoted  LOADER  used  to  load  the  "X"  subroutines  and  the  S,  T, 
N  matrices  and  the  main  program  on  that  specific  tape. 

Each  program  (i.e.,  LOADER,  EQUIP  CHECK,   SITE  PREP,  MEAS,  REWORK,  etc.) 
contains  a  position  in  the  computer  program  that  will  be  referred  to  as  "The 
Restart  Alternatives  Position"  (TRAP) .     On  every  program  tape  one  way  to  reach 
TRAP  is  by  pressing  Key  0  (denoted  f^  on  the  upper  right  hand  set  of  program 
keys  on  the  computer  keyboard) .     This  is  the  point  on  each  program  tape  where 
the  operator  can  choose  the  major  options  available  on  the  program.  This 
restart  position  is  usually  the  position  in  the  program  where  the  computer  stops 
when  a  task  has  been  completed.     Going  to  TRAP  via  Key  0  normally  clears  all  of 
the  adverse  internal  computer  flags,  etc.,  sometimes  set  up  when  a  computer 
error  is  encountered. 
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After  loading  the  SITE  PREP  program,  either  the  MEAS  or  the  REWORK  programs 
can  be  loaded  from  TRAP  without  using  LOADER  or  reloading  the  subroutines  and 
the  S,  T,  N  matrices.     Similarly,  REWORK  can  be  reached  from  TRAP  in  MEAS. 

•• •  The  summary  tape  is  used  in  the  external  cassette  at  the  same  time  either 
MEAS  or  REWORK  is  used.     The  summary  tape  collects  duplicate  measurement  data 
when  used  with  the  MEAS  tape.     When  used  with  the  REWORK  tape,   the  summary  tape 
is  the  source  of  measurement  data  being  reworked  and  the  tape  upon  which  the 
results  are  stored.     In  contrast,  a  MEAS  tape  is  inserted  for  each  data  run; 
and,  at  the  end  of  the  data  run,   the  measurement  program  and  the  measurement 
conditions  are  stored,   the  protect  tabs  are  removed,  and  nothing  new  is  ever 
written  on  it  again.     That  is,  the  summary  tape  is  a  working  tape,  and  a  MEAS 
tape  is  an  archives  tape. 

6.     THE  COMPUTER  PROGRAMS 

Following  are  a  brief  description  of  the  purpose  of  a  particular  program 
and  comment  about  the  key  structural  elements  of  the  program.  These  comments 
are  then  followed  by  an  annotated  computer  printout. 

The  purpose  of  the  annotated  computer  printouts  is  to  provide  comments  and 
instructions  in  a  terse  form  for  the  operation  of  the  various  computer  programs 
and  to  display  the  normal  responses  to  the  computer-generated  questions.     In  the 
context  of  the  computer  printout,   some  instructions  are  easier  to  locate,  and 
the  meaning  more  obvious.     Keyboard  entries,  which  can  be  deduced  from  the 
printout,  have  no  special  notation  on  the  printout.     For  example,   the  demand  for 
a  keyboard  entry  is  indicated  by  a  question  mark,   so  the  entry  after  the  ques- 
tion mark  is  the  keyboard  response.     If  there  is  no  obvious  response,  the 
response  is  a  space  bar  followed  by  execute,  which  is  the  standard  response  when 
the  value  of  the  parameter  currently  in  the  computer  memory  is  satisfactory  and 
no  change  is  desired.     Keyboard  questions  that  are  needed  but  are  not  obvious  on 
the  printout  are  indicated  with  an  asterisk,   followed  by  an  explanation  of  the 
operation  performed. 

6.1.     The  Equipment  Check  Program 

The  purpose  of  the  equipment  check  (EQUIP  CHECK)  program  is  to  validate 
that  the  ETMS  is  operating  satisfactorily  after  being  transported,   to  establish 
the  operating  points  and  characteristics  of  the  earth  terminal,  and  to  collect 
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historical  information  concerning  normal  operating  conditions  to  aid  in  diag- 
nosing which  element  of  the  system  has  failed. 

At  TRAP  (e.g.,  via  Key  0)  normally  the  "1  =  AUTO  CK"  option  is  selected. 
The  "0  =  KEY  LIST"  option  prints  the  list  of  manual  tests  that  can  be  selected 
using  the  various  program  keys.     The  manual  operations  allow  a  selection  of 
graph  scales,  or  measurement  repeat  numbers,   etc.   that  is  not  available  with  the 
"auto  CK"  option.     In  the  AUTO  CK  all  the  pertinent  tests  are  performed  in 
sequence  with  ranges  and  scales  preselected.     The  various  tests  are  discussed  in 
the  following  paragraphs. 

To  execute  a  single  test  manually,   enter  TRAP  to  remove  the  AUTO  CK  flag 
(F2) ,   then  press  the  appropriate  special  function  key.     Additional  information 
concerning  the  equipment  check  is  contained  on  the  annotated  computer  printouts 
in  section  6.1.8. 

6.1.1  Key  1 :     Check  List 

The  check  list  sequentially  lists  the  nominal  settings  and  conditions  that 
are  required  for  the  normal  operation  and  test  conditions  of  the  ETMS .     In  the 
AUTO  CK  option,   there  is  an  opportunity  to  step  over  the  check  list.     The  step- 
over  would  be  appropriate  if  the  operator  has  already  performed  the  check  list 
once  and  is  redoing  the  AUTO  CK  to  determine  if  the  ETMS  has  stabilized. 

6.1.2    Key  2:  Check 

The  purpose  of  this  routine  is  to  verify  that  the  digital  voltm.eter  (D\^l) 
is  obeying  the  computer  commands  properly.  The  ET>iS  control  unit  sends  a  com- 
mand to  short  the  input  to  the  D\^I  and  change  scale  etc.  The  calculator  display 
indicates  the  appropriate  response,  and  holds  this  command  condition  until  the 
operator  presses  some  key  -  e.g.,  the  space  bar  follov;ed  by  pressing  the  "EXC" 
key.  If  the  TiVl-l  fails  to  perform  properly,  check  that  control  cables  between 
the  "ETMS  Control  Unit,"  the  calculator,  and  the  D\'M  are  secure.  If  this  does 
not  solve  the  discrepancy  refer  to  the  maintenance  manual. 

6.1.3    Key  3:     Check  Channel  Voltages 

The  purpose  of  this  check  is  to  verify  that  the  various  power  supply 
voltages  are  correct,   and  that  all  of  the  multiplexer  comimands  are  being  prop- 
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erly  executed.     This  program  sequentially  selects  the  multiplexer  channels 
starting  with  channel  zero,  then  reads  the  voltmeter,  prints  out  the  results, 
compares  the  voltmeter  reading  with  nominal  conditions,  and  prints  out  "NOT 
NORMAL"  for  the  channels  which  are  outside  the  expected  range  for  stabilized 
operation  of  the  ETMS.     When  the  equipment  check  is  right  after  the  equipment  is 
first  turned  on  (as  it  should  be),  several  of  the  channel  checks  typically 
indicate  not  normal.     More  will  be  said  of  this  in  the  following  detailed  con- 
siderations of  the  channel  voltage  checks.     If  a  channel  voltage  continues  to  be 
out  of  normal  range  after  three  hours,  unless  otherwise  indicated  below,  check 
that  all  the  cables  are  connected  properly,   then  consult  the  maintenance  manual. 

6.1.3.1     Channel  0:     GROUND  DVM 

When  the  ETMS  has  stabilized,  the  output  of  the  DVM  with  its  input  grounded 
should  be  zero  within  10  ^  volts.     It  typically  requires  three  hours'  operation 
before  the  voltage  is  consistently  within  tolerance.     If  the  voltage  is  not 
within  tolerance  after  three  hours'  operation,   the  DVM  should  be  rezeroed  using 
the  zero  set  adjust  on  the  front  of  the  DVM.     To  ground  the  DVM,  one  can  either 
stop  the  program  mode  by  pressing  the  "end"  key,   then  use  the  keyboard  entry 
FNX  111,  Exc,  or  enter  the  control  code  111   (binary  number     110  1111)  into  the 
program  switch  keys  on  the  ETMS  Control  Unit  and  press  the  "load"  switch.  For 
the  adjustment,  the  DVM  is  taken  out  of  program  control  via  the  "program  control" 
button  on  the  DVM  front  panel  and  switched  manually  to  the  most  sensitive  voltage 
scale,  and  the  "external  rate"  knob  rotated  full  cw.     After  the  adjustment,  the 
"program  control"  button  must  be  returned  to  the  in  position,  and  the  "external 
rate"  knob  in  the  full  ccw  position. 

.  ,  ,  ^ '  .,       6.1.3.2     Channel  1:  Temperature 

■'         If  the  remote  temperature  probe  is  connected,   the  Channel  1  voltage  reading 
is  the  probe  temperature  in  Fahrenheit  [8]  divided  by  100.     The  indicated  tempera- 
ture should  immediately  be  within  3  degrees  of  the  temperature  as  registered  on  j 
the  standby  manual  temperature/relative  humidity  meter,  or  as  displayed  by  the 
temperature  readout  on  the  temperature/humidity  unit.     If  the  remote  temperature  ; 
probe  is  not  connected,  then  the  Channel  1  voltage  is  not  important. 
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6.1.3.3    Channel  2:     Dew  Point 

If  the  dew  point  sensor  with  its  lithium  chloride  bobbin  is  installed 
according  to  the  site  set-up  instructions  in  the  maintenance  manual,  the  voltage 
in  Channel  2  is  the  dew  point  temperature  divided  by  100  as  indicated  by  the  dew 
point  readout.     The  dew  point  reading  will  not  be  accurate  for  at  least  30 
minutes.     The  dew  point  detector  will  not  function  when  the  outdoor  temperature 
is  below  freezing.     The  relative  humidity  calculated  from  the  dew  point  reading 
should  agree  with  the  relative  humidity  reading  on  the  standby  manual  temperature- 
relative  humidity  meter  within  about  10%. 

6.1.3.4  Channel  3:     +20  Volts,  RF  Unit 

Channel  3  monitors  the  primary  power  supply  in  the  ETMS  Control  Unit  which 
powers  the  two  10-200  MHz  signal  amplifiers.     Check  the  J355/665  cable,  or 
consult  the  maintenance  manual. 

6.1.3.5  Channel  4:     +12  volt,  RF  Unit 

Channel  4  monitors  the  power  supply/reference  voltage  which  powers  the 
simulated  noise  add  sources. 

6.1.3.6    Channel  5:     D/A  Output 

Channel  5  monitors  the  programmable  stable  offset  voltage  used  for  the  NBS 
type  IV  power  bridge. 

6.1.3.7  Channel  6:     Crystal  Diode  Voltage 

Channel  6  monitors  the  crystal  diode  voltage.  The  crystal  diode  voltage  is 
used  to  activate  the  power  alarm  circuit  which  is  used  to  protect  the  thermistor 
power  element  in  the  NBS  type  IV  power  bridge.  The  crystal  output  is  a  negative 
voltage  proportional  to  the  incident  power. 

6.1.3.8  Channel  7:     D/A  Reference  Voltage 

Channel  7  monitors  the  precision  voltage  which  determines  the  accuracy  of 
the  digital  voltage  to  analogue  voltage  converter  which  is  used  as  the  precision 
offset  voltage  needed  in  conjunction  with  the  NBS  type  IV  power  bridge.     If  this 
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voltage  is  not  normal,  check 
the  maintenance  manual. 


the  operation  of 


the  digital  voltmeter  or  consult 


6.1.3.9     Channel  8:     Power  Bridge  Output 

Channel  8  monitors  the  voltage  across  the  NBS  type  IV  power  bridge.  This 
voltage  requires  about  three  hours  to  stabilize  to  within  ±0.2  volts. 

.     ,     ,  6.1.3.10    Channel  9:     Set  Fine  Voltage 

Channel  9  sets  the  precision  digital  offset  voltage  used  to  buck  out  the 
voltage  across  the  NBS  type  IV  power  bridge.  This  bucking  voltage  is  used  to 
improve  the  resolution  of  measuring  the  small  change  in  voltage  caused  by  the 
microwave  power  changing  the  resistance  of  the  power  sensing  thermistor.  The 
magnitude  of  Channel  9  is  approximately  1/10  of  the  Channel  5  voltage. 

6.1.3.11    Channel  10:     Power  Bridge  vs.  Fine  Reference 

The  Channel  10  voltage  is  the  power  bridge  voltage  bucked  near  zero  by  the 
precision  digital  offset  voltage  as  set  using  a  Channel  9  command. 

6.1.4    Key  4:     Check  Program  Attenuators 

The  purpose  of  this  test  is  to  verify  the  proper  operation  of  the  program 
attenuators,  particularly  for  measurements  of  EIRP  or  C/kT.     In  addition,  the 
measured  value  of  the  standard  attenuation  is  measured  over  a  16-dB  range.  This 
check  is  one  of  the  checks  of  the  linearity  of  the  ETMS  measurement  system.  The 
repeatability  of  the  measured  values  is  printed  out,  as  is  a  running  printout  of 
the  drift  in  the  absolute  power  level  throughout  the  duration  of  the  test. 
Thus,  besides  testing  the  attenuation  steps  of  the  programmable  attenuator,  this 
test  also  indicates  short-term,  and  moderate-term  stabilities  of  the  ETMS  and 
ETMS  internal  noise  sources.     If  a  record  of  the  earth  terminal  short-  and 
medium-term  stabilities  is  desired,   instead  of  using  the  internal  ETMS  noise 
source,   the  earth  terminal  with  the  ETMS  microwave  noise  sources  can  be  connected 
as  the  test  signal. 
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6.1.5  Key  5:     Graph  Option: 

Check  Power,  Linearity,  and  Stability  of  Type  IV  Bridge 

This  check  is  a  similar  check  to  the  last  check  except  the  results  are 
presented  graphically.     In  this  check  three  measurements  of  the  attenuation  of 
the  standard  attenuator  are  averaged  together,  and  the  mean  and  standard  devia- 
tions are  plotted.     The  initial  power  level  of  this  power  ratio  test  is  varied 
over  a  16-dB  range.     Any  nonlinear ity  of  the  type  IV  power  bridge,  or  unusually 
noisy  measurement  conditions  are  easiest  to  spot  on  this  graph.     The  magnitude 
of  the  nonlinearity  may  also  be  identified  on  the  Key  4  or  Key  6  tests.  Any 
failure  of  the  standard  attenuator,  or  of  the  relays  which  switch  the  standard 
attenuator  in  and  out  are  most  obvious  in  this  test.     If  a  power  supply  becomes 
very  noisy,  it  can  show  up  as  a  change  in  nonlinearity  (i.e.,  a  change  in  the 
change  of  the  value  measured  for  the  standard  attenuator  versus  input  power 
magnitude) . 

6.1.6  Key  5:     Table  Option: 

Check  Power,  Linearity,  and  Stability  of  the  Type  IV  Bridge 

A  second  option  of  Key  5  is  to  print  out  the  key  bridge  voltages  for 
repeated  power  measurements.     If  one  of  the  multiplexer  relays  fails  to  operate 
correctly,  the  identification  of  which  relay  is  malfunctioning  is  often  obvious 
from  which  measured  voltage  value  becomes  unstable. 

6.1.7     Key  6:     Noise  Add  Test 

This  check  is  designed  to  check  the  operation  and  stability  of  the  noise 
add  sources.    When  the  ETMS  input  is  connected  to  the  internal  noise  add  sources, 
it  checks  the  amplitudes  and  stabilities  of  the  internal  noise  add  sources. 
When  the  ETMS  is  connected  to  the  earth  terminal,  this  test  checks  the  magnitude 
and  stability  of  the  microwave  noise  add.     Information  on  the  stability  of  the 
earth  terminal  also  is  recorded. 

The  power  of  the  system  noise,  the  power  from  noise  add  #1  and  noise  add 
#2,  is  printed  out  before  the  stability  test  begins.  If  one  of  the  noise  add 
sources  is  not  functioning,  this  will  be  obvious  here.  In  the  main  printout, 
the  power  measurements  and  power  ratios  are  printed  in  the  first  row,  and  the 
standard  deviation  of  the  measurements  are  printed  in  the  second  row. 
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The  power  ratios  listed  in  the  five  right-hand  columns  of  the  test  should 
be  independent  of  initial  power  level.  In  particular,  the  ratio  of  noise  add  #1 
to  noise  add  #2  at  a  particular  frequency  should  not  change  significantly  over  a 
long  period  of  time.  If  it  does,  it  signifies  that  one  of  the  noise  add  sources 
is  drifting  or  is  becoming  unstable.  An  unstable  noise  add  source  introduces  an 
unnecessary  measurement  error  and  needs  to  be  corrected. 
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6.1.8     EQUIP  CHECK  A^TQTAIED  PRINTOUT 


£QJ  i  F'    C  HECK  ^ 


RUN 


KEY  0:  RESTRRT 

KEY  l:  CHECK  LIST 

KEY  2:  CHECK  DVrl 

KEY  3:  CHECK' CHfiHMEL  VOLThGES 

KEY  4:  CHECK  fiTTEHUSiTORS 

KEY  5:  CHECK  PWR,   TYPE  I¥  &  STTEH  STABILITY 

KEY  6:  CHECK  HOISE  fiDD  STftBIi-ITY 

iKEY  ?il  CHflHGE  STflHBflRD  hTTEHUhTIH  VALUE 

KEY  ?:  HEW  FREQ?  Bl-I.   IHPUT  fiTTN?   SIHL  SThR  HOISE 


X'f/     FUfJTi'^        CAU      A'flt/  ^  Sro    Attv    i/alvs.  CHaj^/i£[^ 


e=KEY  LIST, i=HbTO 
STE<  fe.lStD  dBK 
STEc  fa. Illy  dBX 
STPc   &,1172  dBK 


CKC  -NC>:  1 
=NC>:  4=0S@O 
=NC>:  4.035e 


?STB<  6.1003  dBX  =HC^;  4,8733  ?4.03 
Y4.085 

?4.e9 


tX  IT 
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EQUIP  CHECK  (cont) 


'J  'M. 


U=M  lV  L  1ST:.  1  ^^HilTf:  a-- 
10  i„  i-iEl  I-    L...  i r  ■ .   Ir.T!  - 

s  mC  pnr  iw  i.  n:!:.;,-::  o\v-' 

Lht.Fi;    E:^:T  PmiE  Fi.'l.L  fCi.r> 

LRhFi:   DFiTH  liUrPnr  uUTTOil  Irl'? 

rihr;r'|t:    PEOGEtM'i  i:0.iTEriL  EiiTTON  IN"'' 

F  F'  :  i  :■  \  I  "i" ;  B  f i  \  i  ;j  i  ■ i  ■■  >  ■: .  F-  P  E  Q  \?  5 .  j I .  "  ?'  0 II  i-!  z ' ; 

F'F  'JHIT:    f\TU..\\       T  TO   17  .JB'"' 

F'F  UiilT:   SIi;  ■-■Hi-   hiOI'iE  0  3. '5  d&'"' 

PF  UNIT:    METER  PHFiGE  Kl'?' 

MOI'JE  SOUR  EE  C  OHriEETEIi  TO  RF  IIIPUT"' 

RF  Ui-JIT:   OUTFUr  METER  0  -5.5  dB'? 

CLOEF;  UNIT:   SET  DfiTE':' 

FLOCr;  UNIT:   SET  GMT  TIME''' 

EliL 


0  -Vo^xyfr.t        ^^-yfrvu-t^  ^- 


•76   1024  21. 
M  E;  1  E  .  1. 2   :  D  5  -  F  E i ;  ■     £  Q  U I F'  G  H  E  G  F     T 1  -  F  0 : 


SviiVi  #  6.89 


PROG     KEY  2: 


:-;,u5  <rii-4>  T2-4 


:HEGK  IiIGITfli.^  FiUL  I  IMETEE 


;:UH  8 


Iivri  ^UJMC  i  I  on   1  1  1  1 :   FILTER  OUT"' 
DVU  FUi-IGTIOM   i   .,,0:   FILTER  iflv' 
U^OO         VOLT  RFIHGE 


]08     ','OLT  RFli-lijE 


RRHGE  #  0  I: EG  Pl  -'''ES  1 
RhMGE  #   i     ^  FE  G  '?\  OlES  3 


■'UL.T  RFiNiiE 


1         VOLT  FHNGE 


8.  1     VOLT  ROMLiE 


OLFFO-VOLl  RhMGE 


RFlMGE  #  2 
RFirlGE  tt  3         DEG  PL  fil  e 


bU'   PLi'n:../::  4 


PRNCE  #  4         DEG  PI  01  FS  F 


RRMGE  tt  ;■■' 


Ehji 
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EQUIP  CHECK  (cont) 


NBSie.iS  <D5-Fj  [T 


r 


Dl-4>  12-4 


PROG 

KEV  3: 

CHECK  CH9NHEL 

VOLThGES 

  ETHS    5£Klf<L  /Ja 

chhhhel 

vOLTRGE 

sthtus 

NOMItiHL 

T  

e=SC  OFFSET 

0 

- 

vk: 

e 

1. 

0ee88E-85 

l=TEf1P 

e.  74184- 

8.5 

8. 

2=BEi4  POINT 

e.4312  - 

f3.l3  F. 

8.5 

8. 

ir 

2=-*-2e  VOLTS 

20 . 0 1 9 

28- 

8. 

'd 

i=+i2  VOLTS 

11.9S7S 

11.9 

0. 

1 

s^dhc  output 

4.8326 

Ok 

4.S333 

e. 

82 

t=KTHL  DIOBE 

■1.71fc80E- 

-83 

OK 

-8.8135 

8. 

8125 

?=D  H  REF 

23S7 

OK 

fa. 24 

8. 

81 

s=eRDG  nuTFi.r 

OK 

2.5 

8. 

1 

9=SET  FINE  REF 

3. 4S333 

OK 

8.436638 

08OeOE-83 

vs.  ?£f  - 

•1.6739eE- 

-04 

9 

1. 

eaeoeE-es 
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EQUIP  CHECK  (cont) 


\  \  B  S 1  E .  1  £  <  n  5  F  0  )■     E I J I  I I F^'  C  i  \  E.  r  K     T 1  -  F  d ' 


85  <ril-4>  T 


#  6,09 


PROG 


::E'i'  4: 


CHECK  FiTTENUFlTCRS 


RUli 


SI  ML  Sin 
INPUT  HT 
ST  II  HT 


<  flTTH:   3.5  clB 

TH:  17  dB 

FN:     ,6. 100  dB 

A. 


IF  FREQs 

BHDHD: 

ttl/#2Qdd: 


HES  Ti'PE   IV  OUTpy 


l^ALl/C  /KSSUM  Ed      P'oit,  STD 

y-  0, 15£  : 


HiTH 

17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
17  DB 
\7  DB 
17  DB 
17  DB 


PR  Gil  HTT 
PRGM  FlTT 


#1  #1  PRH  OR  VOLT 
#2       #2  PFJpIoR  VOLT 


2  :■;     i;  _3J1EHSi 
I 

ORIG  PWR/#1  pnr 
STD  CK  0  #2  ' 


'0  MHz 
3  MHz 


"  D  C:  I-: :   O  .  8 1  ■ 


#1  PF.iR/#2  PHR 
NOMINRL  #l/#2 


Pft(M  ATTIH  LUeo 


0 

DB 

0. 43343 

■I-  - 

0  . 

19  ' 

■  1^ 

LI  y  I  ■ 

■i 

1 

1 

DE 

LI  u 

3  4  b  3  i' 

+-- 

0  . 

1 9  '■ 

'r  1 

023 

1 
1 

1 

DL-Jf- 

0 

DB 

0  . 

+  - 

0  . 

13  : 

0  . 

010 

DE 

1 

DB 

0  J 

c:-  r>  r, 

c  r  J  y  y 

+  -■ 

0  . 

19  ' 

u                              0  . 

0  0  7 

DB 

1 

DB-i^ 

0 

DB 

0  . 

43347 

-I-  - 

0  . 

0  3  ° 

—  /  g-  1^ 

0 

005  DB 

2.940 

DE 

■-' 

DB 

LI . 

c.  c!.  y  ci  h 

4..  _. 

0  . 

1 2  ■ 

0 

0  1  ?' 

DB 

DE 

1  tz 

0 

DB 

0  . 

43249 

+  _ 

0  . 

14  " 

i  0 

015 

DE 

(3„934  DK 

¥  ^8 

Tip 

0 . 

1  f  43FJ 

0 

0 

013 

DB 

4 

DE-)f- 

0 

DB 

0  , 

+  - 

0  . 

11  ■ 

14  ■ 

0, 

JiE^ 

Be 

4.92  3 

DB 

5 

DB 

0  . 

13949 

+  - 

0  . 

0  0  5 

DB 

H-fl 

0 

DB 

0  . 

+  -- 

0  . 

14  • 

0 

0  i.  ,;■ 

DB 

5  ,  3  3 

DB 

s 

DB 

0  . 

1115 1 

H  

0  , 

12  : 

0 

0 1  4 

DB 

6 

DB 

0 

DB 

0  . 

LI  . 

;  0 

011 

DB 

6 .  Fi  7  0 

DE 

I' 

DB 

8. 

03900 

+  - 

0  u 

07 

;  0 

005 

DB 

DB 

¥■+  1 

Id 

DB 

0  . 

+  - 

0  . 

■«  0 

0 1 5 

DE 

_7.97ri 

0 

Q 

DB 

DB 
DB 

0  u 

0  . 
0  . 

0  b  9  0  3 

43297 
0  5  5  8  4 

+  -- 

+  - 
+  - 

0  . 

0  . 
0  . 

0  3 

1 3 
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0 
0 

0 

0 1  >; 

0 1  Fi 

01 '-1 

DB 

DE 
DB 

.LE 

DB 
DB 

■If- 

8  J  & 
8+  1 

0 

DB 

0  . 

43143 

+  -- 

0 

15 

;  0 

025 

DB 

9 .  S'  2  4 

DE 

10 

DB 

Fi 

84391 

■f  - 

0 

03 

0' 

0  1  0 

DB 

'  io" 

DE 

8+i 

0 

DB 

0 

43103 

+  - 

0 

18 

;  0 

030 

DB 

10.9  0  2 

DB 

1  i 

DB 

0 

0  3  5  0  2 

+  - 

0 

17 

0 

.  004 

DB 

1  1 

DB 

/ 

0 

DB 

0 

431 14 

+  

0 

12 

i  0 

.  029 

DB 

12. 368 

DB 

12 
Fl 

DB 
DB 

0 
8 

4  

+  - 

0 
0 

13 

■  0 

0 

.  00  f' 
.011 

DB 

DB 

1 2. 

DB 
DE 

8  + V 

13 

DE 

fl 

8  2  2  ..5  6 

+  - 

0 

26 

;  --0 

.  0  Fi  1 

DB 

i  3 ' 

DE 

B+  f-.-H 

Fi 

DB 

0 

43386 

-1  

0 

16 

0 

,  0  1 

DE 

Dl:l 

1  ■4- 

DB 

0 

01734 

¥  ■ 

8 

2  0 

/  0 

DB 

\  4 

DE 

0 

DB 

fi 

43207 

0 

1  'S' 

\-:-' 

D  B 

15 

DB 

0 

01423 

0 

1 3 

Fl 

.  Li  t;i ... 

.1 1  Li 

1  5 

DB 
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EQUIP  CHECK  Ccont) 


:76   1024  11.32: 


;S1E 

.  12 

<D5-F0 

EQUIP  CHECK 

Tl-FO: 

H.05  <Dl-4> 

T 

2-4 

•£ri 

tt  6 

.09 

-4- 

RUH 

0 

PROG 

KEY 

5: 

CHECK  P  W  R  ?  L I H  E  H  R I T  ■  i  , 3  T  H  e 

OF  TYPE  IV 

SI  ML 

SThR  hTTH: 

cr 

. -1  ,  .J 

dB 

IF  FREQ: 

70  MM 

INPUT 

HTTH: 

'l7 

dB 

BHUUIi: 

5.3  MH 

ST  II 

HTTH:  t. 

100 

dB 

#l/#2njdd: 

0 

.  2468 

rf  »^  *^ 

m. 

BRDG  V 

V? 

V3 

V9 

FWRaiw:.' 

( 

:k  err 

IGrlh 

3290MW 

1 

2. 

4839 

0. 

000436 

-0. 

012847 

0. 

. 000435 

0. 

■  i '-.  J  ■  ■  'J 

:-j 

a   rl'  i-J  -■  . 

c 

2. 

4839 

0. 

0004>:y 

-0. 

002303 

0, 

. 000436 

0. 

0804 MM 

0 , 

. 0179DB 

0 

.  0O--; 

3 

I- 

w  a 

4839 

0. 

000433 

-0. 

012810 

0  , 

. 000434 

0. 

328 IMW 

U , 

, OObODB 

0 

4 

■J 
w  ■ 

4339 

0  . 

000437 

-0. 

oe2r-9S 

0  , 

. 000431 

0 . 

i-jS02MIm 

0 

.  0i74IiB 

0 

.  19". 

c 

■J 

2. 

4839 

0. 

000435 

-0.012810 

0 

.000432 

0. 

323 IHN 

0 , 

.  01  66I1B 

0 

.  16"; 

6 

J.  ■ 

4839 

0. 

000434 

-0. 

002807 

0, 

. 000429 

0. 

0304MW 

0, 

.  0073IIB 

0 

.  14"; 

)■ 

2. 

4339 

0. 

000431 

-0. 

012863 

0 

. 000427 

0. 

3293MU 

U 

.  0237IIE 

0 

.  19V 

8 

b-  ■ 

4839 

0  . 

000431 

-0. 

002308 

0 

. 000426 

0 . 

08O3MU 

0 

.  0263118 

0 

.11-; 

9 

4839 

0. 

000429 

-0 . 

012810 

0 

. 000426 

0. 

3279MW 

0 

. OeSSDB 

0.  19;; 

10 

2. 

4839 

0. 

0004^3 

-0. 

002314 

0 

. 000424 

0. 

0Se4MW 

0 

.  O039r!B 

0 

.  1 1^; 

1  1 

tL.  ■ 

4839 

0. 

000428 

-0  . 

012797 

0 

. 000423 

0. 

327eriu 

—  y , 

. 001  IBB 

0 

=  20^; 

12 

"J 

« 

4839 

0. 

000425 

-0. 

002815 

0 

.000422 

0. 

0SO4NW 

0 

. eOlODB 

0 

.  10'. 

1  ;^ 

^  ■ 

4839 

0. 

000425 

-0. 

012866 

3 

.  0Oe'i21 

0. 

3292riW 

M 

y 

.0227DE 

0 

.  2 1 

14 

2. 

4839 

0. 

000423 

-0. 

002813 

-0 

.000420 

0. 

0S03MW 

H 

.  02SOIIB 

0 

.  10-; 

1  J 

2 . 

4839 

0. 

000420 

-0. 

012854 

0 

. 000416 

0. 

3233MW 

0 

.  0225IIB 

0 

.  20'-i 

It 

4839 

0. 

000421 

-0. 

002821 

0 

. 000416 

0. 

08e4HtJ 

0 

. OlSSDB 

0 

.  y9^-; 

1  1 

L_  a 

4839 

0. 

000413 

-0. 

012837 

0 

.000414 

0. 

32S3MN 

0 

.  0  0  9  6  D  B 

0.  19:. 

18 

lI  ■ 

4£;39 

0. 

000417 

-0. 

002320 

0 

=  000413 

r 

0. 

0303MN 

0 

. 0156DE 

0 

.  09'; 

19 

"T" 

a 

4839 

0. 

000415 

-0. 

012349 

0 

. 000411 

0  . 

3285MH 

0 

.  0IS6I1E 

0 

.  13^ 

20 

^  ■ 

4839 

0. 

000413 

-0. 

002329 

0 

. 000410 

0. 

0804MN 

0 

. 0112DB 

0 

.  09°. 

21 

'J 

4839 

0. 

000412 

-0  . 

012841 

0 

. 000410 

0. 

32S3riW 

0 

.  0379iiB 

0 

.  17V 

■ 

4839 

0. 

000410 

-0 . 

002332 

0 

. 000407 

0. 

0804MN 

0 

.  0O79riB 

0 

.  09°; 

23 

4839 

0, 

000410 

-0. 

012831 

0 

. 000406 

0. 

3230MW 

0 

. 0037DB 

0 

.  17V 

24 

2 . 

4839 

0. 

000407 

-0. 

002836 

0 

. 000403 

0. 

08O5MH 

0 

. 003ODB 

0 

.  09°  -. 

25 

2a 

4839 

0. 

000406 

-0. 

012384 

0 

. 000402 

0. 

3292MW 

0 

.  0190IIB 

0 

.  17-; 

26 

4839 

0. 

000404 

-0. 

002841 

0 

. 000400 

0. 

eS05MW 

0 

.  0l63IiB 

0 

.  10"; 

c  < 
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2.4839 
2.4839 


0. 000404 
0. 000402 


-0.012350 
-0. 002345 


0. 000399 
0. 000399 


0.  3233r'1U 
0.  0SQ6NIJ 


0.  0044IIE 
0. 001 IDB 


IT      IH  ^CAS 
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EQUIP  CHECK  (cont) 


'76   lti::4  21,46) 
NE;S1E.12  <ri5-F0>     EQUIP  CHECK     Tl-FC:  K.&Z  <  1:1-4)  T2-4 


fi  tt  6.09 


KF 


SI  ML  STFiR  FlTTN:  -3.5  dS 
INPUT   FiTTH:  17  dB 

STD       FFTTH:       6.  loCi  dB 


C  H  E;  C  f(  F'  U  R  ?  L.  I U  E  H  P I T  Y  ?  S  T  H     0  F 

IF  FREu:  79  MHz 

BHDWIi:  5,3  MHz 

#l.-  #2add:     9. 2463 


PUN  U 
TYPE  IV 


#1 
#2 


LEVEL:  r 
LEVEL:  1 


DB  e: 
I'B  e: 


+     U  liB  CK 

+■    1  iiB  ch-; 


rii 

Til 


MEHS/PLGT  PI  3 
UNIT     =  y.yiee  DB 


•■  0 .  150 


TIME 
1 


1 1 
12 
13 
14 
15 
lb 
17 
18 
19 
2  0 


2 1.50' 


0  5  kJ  H  „  1-1 . 

!..„.!....!. 

:ER0=  6, 125  ] 


0  .  i  J  0 
I 


0.250  DB 


I 


+ 

-1- 

+ 

1  I 

4' 

-h  I 
■+• 

+ 

+ 

!  4- ! 

4- 

I 


I  4.  I 

H- 


+  I 
—  i<r- 

+  i 
!    +  ! 
+ 

4  ! 
I    +  I 

+  ! 
H  ! 
+  ! 
!  +  ! 
+  ! 
I 


AVE 

1247DB 
1 129DB 
121SDE; 
1 164BB 
1  1 13DB 
1 1 19DE 
leSbDB 
1202DB 
1 139LB 
1093Db 
1 148LB 
1057DB 
y79CijB 
leSlDB 
03nDE 
1 0S3DE 

I  14  5. OB 
1205Dd 
12aiDB 
1227BB 
1 1 97DB 
1 1S7DB 

I I  69IiB 
1 18  IDE 
1 127DB 
1019DB 
1 149DB 
129':n:iB 
102539 


1 095DB 

lysaDB 

07'j6DB 
1095DB 
1  10SIM) 
1213110 

.  r2;-;8i.'B 


#1  pup 
0. 42900 

0. 275MN 
0.  2r=nilg 
0 .  1 75iTM 
0. 140MN 
0. 1 1 IMN 

0 .  .-■i69i^iN 


0. 014MN 
0 . y22M0 
0:,  0lKr1U 


0  .  i  <-\  0  i'l  W 
0. 271MN 
0,  2171 
0.  1721 
0.  137! 
0 .  1  0  ■)  M  U 
0. 0y7MN 
0. yBSMN 
iZi.  055MN 
0. 044MN 
0. 03SMN 
3MU 


0 

0, 022MN 
0.  y  ISMli 
0,  0l4i7i 
0  4 28 MM 
0. 342UM 
0 .  2  ^■■1 U 
y,  210:1') 
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EQUIP  CHECK  (cont) 


HES1E.12  <ri5-F0>     EQUiP  CHEl 


1024  21.55: 
Tl-F0i  ) 


;nl-4>  T2-4 


#  6.89 


PROG     KEY  b 


cotuJec^re^  t>  TO 


IJH  0 


>ISE  HrB  TEST 


SIML  STAR  hTTH:  3.5  dB 
INPUT  FiTTN:  17  dB 

Sin       hTTH:       b.l00  dB 

F=        424^d):'H'J  n.-dd    #1=    0.1545  nU 


IF  FREQ: 
#l/#2o.dd 


MM: 


add  #2=  0.1*621  nU 


0.216: 
U.  II--; 


0, 1456 


B  0 .  1 1  ■•. 


0 , 0 1 b2  ^ 

1 . 17°;  B.  0. 48--;  *  0 
<  I  J 

2^0.1721  ^0.1151  '  0.  0620  ^0.  2423'-' 0 
*0.13v    'Jh.ivv    -fi.R6v  + 

...  v.-     --  +-        -  ft. 


837  I  0.2560  3. 

0 . 1 6°;  *.  0 .  Zdy. 


Is. 1374  ^ 


0  ■-'  3  0     0 .  0  4  y  o  ^  0 .  19" 


^0.34v  .0.2 


0.  2414  <»  0.  2530  S; 


0.1? 


H .  30?; 


O.iJ-.     ^ti.2l';  50.4 
^  _    ^      _  5 

>*.  M  .  1  H  3  ,■  ■   ^  0  .  0  ,-  ■  42       H  .  H 

iw-*:    ^0.37-;    «1.23?;  50.31 

I0. 3377  Q0. 0594  ^3. 03 15  50. 1223  *  0, 1541  J  O. 2563  5 
^0.15";    '*^0.27-";     o0,3S'-;    '*0.  ■  ^"^^  - 


o0.  1926^0.255 


•C6.14V  ^ 
2  * 


y .  0  4  D  y  ^  0 .  0245     0 .  0  y  5 1' 


»  0 .  4 1 : 

*-0 .  2^1 

^0.33: 


iZ     «0.  ,■  i"-;  iiO.  bl".     i0.  4 

«•  u 

-  •«  _  * 

1 1 .  H  o . ;    3  0 .   3 ';  "  0 .  o  b .     «  o .  i 
<  T 

^0.0433  0,  0293  'Jo.  0156  ^0.0612  ^3.0761  0.254 
o  0 .  1 7".    -^0 .  34".      0 .  76';      3 .  1 8°-.      ,9 .  4  " 


.  K}  m  K}  -J  ^  ■_•  ^ 

0.  10°.  ^i. 


0.  253 


0 . 0346 
0.17';    50. 16"; 


l.0f"^;  0.43"; 

i"i    fi  f  1 4      Lj  _  i-j  3 


0 . Ob 03 

0 .  2 1  ■; 

0  .  043; 


0.  253 
1 . 32'; 


3 . 0 1 36 
23"; 

o .  0219    6 ;  0 1 43  0 .  0 0 7 O .  O 3 1 0    0 .  fi  i ; : 4  ; 

0.20";      0.00".  0.3]';  0.30'-.      0.11-;  o, 


0.017 
0.  17\ 


0.0118  O.oOt:; 
0.32>;  1.41'. 


0 . 0246 
0.61". 


0 .  1  1  -; 

0.  330 
0.  4  5-, 


0  .  3  1  ■-. 


F- 

p.- 

S2 

r-- 

1  -^  2 

1  D..-k 
■dB 

.-, 

7631 

0. 

7117 

0  . 

5704 

0  . 

02 13 

0 . 

0  . 

0  . 

16"; 

0  . 

0157 

.-, 
0 . 

7612 
07'-; 

0  . 
0  . 

7120 

11--; 

0  . 

0 . 

5719 

0  . 

0161 
0053 

77  i  2 

0  . 

7119 

5706 

0 . 

0147 

0 . 

0  • 

45"; 

0  . 

7720 

0  . 

7116 

5699 

:  " 

021  0 

1  . 

0  . 

4  b'-; 

•c  -  ■ 

13'. 

0  . 

Oo40 

«c 

J  0  . 

7695 

5724 

0  . 

0161 

0 . 

y  1 

N 
< 

cr  .  -  = . 

•J  o  ■■. 

0  . 

6091 

'0  . 

5 

§0. 

0  . 
0  . 

3120 
0267 

J 

7669 

7053 

5762 

0  . 

6132 

1  7v 

|0. 

0  . 

0062 

-i 

3  0  7 

\ 
<  - 

7 1 4  0 

\  0  . 

5638 

0  . 

0143 

'0 

:  _ 

3  0. 

*  -;i  n 

3 

a. 

0  . 

8051 

.  O- 

7111 

5  6  3  9 

0  . 

0  1  -O  9 

'0 

~7  V 

50. 

> 

<• 

*     -  ■ 

47": 

0  . 

'0  1  d  3 

7441 

nr  -  -  o  cr 
■_'  C-  -J 

0  . 

3101 

0 

63'; 

0  . 

0  . 

0  072 

7792 

!'-■  ■ 

7  Fi  7  2' 

0 

5691 

-0  . 

0077 

0 

99'; 

0  . 

1  i  ■; 

0 

6  . 

0120 

.  7662 

0  . 

7146 

0 

0  . 

6014 

1 

1 

.  7430 
1  f  1  \ 

0  . 

0  . 

0  . 

o  0  -'  ■ 

7105 

0 

1  ^  '■ 

5635 

0 . 

-0  , 
ij  . 

0177 

0363 

'  -  3  7 1 

fOfi 

TIKS 

ier 

0  « 

'7  0  7  3 

5766 

0  . 

6043 

0 

5  ^  'i  ■ 

0 ; 

0 

3 1 '. 

3i . 

6264 

0  . 

7103 

0 

5639 

0  . 

0 1 63 

1 

.  47r. 

0  . 

79". 

0 

41::; 

0  . 

0197 
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EQUIP  CHECK  Ccont) 


NBSIE.  12  <Ii5-F0 

CHRHHEL,' 

y  =  riC  OFFSET 
1=TEMP 
2  =  11  EN  POIHT 
3= +20  VOLTS 
4=+ 12  VOLTS 
5  =  IiRC  OUTPUT 
6=XThL  III  ode 
7  =  Ii.  R  REF 
8=BRIiG  OUTPUT 


(.76  1024  } 
EQUIP  CHECK  T1-Fh: 

REte/^TED  TO  5Ee 


PROG     KEY  3: 
VOLTRCE  STRTU 

0  .    .  OK 

y. 73299  OK 
OK 

m 

OK  • 
OK 
OK 
OK 
OK 
OK ' 


l: 


;^0^.    :Iil-4>  T2-4 


0. 43129 
20.019 
11.9391  . 
4.S32b 
- 1 . 73300E-03 
6.2367 


RUI:I  e 


9=SET  FINE  REF  0.48332 
10=BRriG        REF  3.35000E--04 


:HtCK  CHANNEL  VOLThGES 
NOMIHflL 

0 

0.5 
0.5 

20 

11.9 
4. 3332 
-0. 0125 
.  6.24 

■*.  c- 
C  • 

0.487133 

0 


+-  RRHGE 

1 . 00000E-05 

0.5 
0.5 
0 .  2 

0.  1 

0.  02 

0. 0125 

0.01 

0.  1 

5. 0000OE-03 

1 . 00000E-03 


CONNECT  ERRTH  TEF:ri,SET  PHP  LEVEL (   ^NC):  .1  ? 
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EQUIP  CHECK  (cont) 


NBSIE.  12  <Ii5-Fy  > 


':7b  1924 
EQUIP  CHECK  Tl-FQ: 


:D1-4)  T2-4 


1670: 
CONT 


PROG     KEY  b 


SI  ML  STAR  hTTH:    3.5  : 
INPUT  HTTH:  17  dB 

STD       RTTH:        6. 106  dB 


pi  in 

f'  P^oraif  r'^s  rue  e  AHTH  fBMMM//iL. 


TEST 


IF  FREQ; 
BHUWIi: 
#l.-#2o.dd 


0  MHz 
3  MHz 


0 .  24t.S 


AS  S'^VLATEH 

None   AJ>p  TUT 


P=  0.3193  nW 


add  #1=  0. 1 152  nU 


add  #2=  0.451' 


Pd-'-iN)       P+1+2  ttKnW: 


#l+#2       #l/#2       P.--#l  P/#2 


0. 3255 
6.  92'-; 

G. 2661 
0.61'; 

0.2190 
0 .  :-:3". 


0. 2197 
1  .  16'-i 

0 , 17  9  S 
0.66"; 

0. 1476 
0.  34'-. 


0. 1 167 
0.  47". 

0 .  0962 

1 .  67--. 


0.  455'! 

0 .  3732 
0.61V 


0 .  y  c 


"9  0.3oSl 
;  0.63"-, 


0 . 5694 
1 . 32 

0 . 4656 
0 .  7  0  ■-. 

0 .  3326 
0 .  30"-; 


0.  56'. 

0. 2579 
^.45^; 

0.  2561 

1 .  53'^; 


2.7795  0.7119 

1.04°;  0.33'-; 

2.7574  0.7114 

1.43V  0.16'. 

2. 7756  0, 7095 

1 . 10";  0.  33'-; 


p.- 1+2 

0.5722 
0 .  49"; 


0 .  4  0  ■; 

0 . 5720 
0,  32'-; 


STDck 
dB 
0.  0116 
0 . 004 1 

0 .012  9 

0 .017  0 

0. 0135 
0 . 6027 


0. 1771 
0.  13"; 


0.  1 19^ 
0.  10"; 


y .  0  b  o  y 
0 .  92"; 


0.  24f 

0.  54' 


0 . 3099 
0.  12"-; 


0. 2574 
y .  7'^"; 


2  .  1  b 


0. 7123 
0.  53^; 


0. 5716 
0.  13\ 


0 . 0 1 53 
0 . 0062 


0. 140^ 
0. 16"; 


0 . yy5u 
0. 34V 


0.y510     0.1973     0.2464  0. 


0 . 29 


0.4  = 


'539  0.7129 

'yv  0.11^; 


y . 5 1 yy 
0 . 3 1 


-0 .  0020 
0. 0174 


0.  1 143 

1 .  &6'\ 


y .  0 1- 
1 , 46: 


y .  0  4 1 6 


6. 1611 


0 . 2yyy 
1 . 56  ■■. 


y .  25:: 
0 .  72" 


0.7112 
0 .  20'-; 


0. 5719 
0 .  27'  '. 


-y .  yy2y 
0 . 0034 


0 .1119 
0.  13"-. 


0.0754     0.0404     0.1574  0.1952 


0.13' 


0 .  1 1 V 


0  . 


0. 2566 
0 .  28"-; 


7724  0.7103 
49^      0.  13"; 


0.  573;: 
0.  4i;-; 


y . 0 1 62 
0. 0133 


0 . 0393 
0. 16"; 


y . 0603  0 . 632 
0 . 1 0";      0 .  20" 


y .  1252  0. ibbi 
0.  i4"-;      0. 1 1"-; 


0.  257 
0.  12". 


I '730  0 .  ('  1 3^ 
14"-;  0,23^ 


0.5716 
0.  19"-; 


0>  Olbb 
M  .  003:3 


0 . 0554 
0.  Iflv 


C .  04 Si 
.  11  • ; 


y . 0250 
0 .  22". 


0 . 0974  0.1; 
0 .  46  ■■;       0 .  1 : 


y . 2562 
fi .  66V 


y .  23 


7305  0,7123 
0.52"; 


0.  572 
0 . 34"; 


0 . 0 1 06 
0 . 0090 


0 .  ybj 

0 .  5y"\; 


0 . 0374    0 . y 1 yy 


y .  y 
0 . 3 


0 . 0969 


y .  2  J 

0.41; 


2 .  77b6     0 .  .■■  1  49 


y .  5 1-  ■  i  0 
0.  48"- 


y . 0155 
0 .  6 1 4:3 


0.  044; 
0.  14"; 


y , 0293 
0. 13^; 


0 .015  9 
0.  47". 


0 . 0b2y 

0 . 27  '■; 


0 .  y 
0.19: 


7765  0.7139 
42V  0.31"; 


0. 5717 
H.  ir-;'; 


0 . yyys 
0 .0176 


0 .  y35.. 
0 .  fi9'; 


.-y.y233    0.  yl2b.-.  0. 0496 


0.  10-' 


H .  :-;yv 


0. 43: 


0 . 06 1 6 
0.  17V 


0. 2543 
0 . 23^; 


,■■949  0.7121 
23V  0.45"-.- 


0. 5739 
0.  iSV 


0 . yoob 
0.0131 


0.0177 
55. 13V 


0. 0123 
4  2. 03V 


0  .  0  0  6  3 
41 .  23"; 


0 . 020 1 

0 .  53V 


0 . 0331  0 . 333 1 
42.  U4V  41.50". 


'9  0.71 09 
;       0 . 46\ 


u . 5 , yy 
0 . 27": 


-S.  0232 
0 . 0255 


0.0224 
0.  i  7". 


0 .  0 1  1    y  „  0  0  c.  0    0 ,  y  5 : 


09"; 


01: 


0 .  52". 


0 . 0392 
0 .  0  7  "■ . 


:546  2 


3036  0.7126 
21V  o,5Sv 


y .  5, ■  22 
0 . 23"; 


y . 0034 
0. 033S 


0.01,-9 
0.  19". 


0. 0121     0. 0064 


0 .  025 
0.  47". 


0.0314  0.255 
0.46";  0.4;.'. 


,■"734  0.7100 
39".  0.34:. 


y .  57o;3 
0 . 28'-; 


0.  y;j:73 
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6.2    The  Loader  Program 

The  purpose  of  the  loader  program  is  to  load  the  key  programs,  the  common 
subroutines,  the  star  data,  the  site  data,  and  the  ETMS  characteristic  data,  to 
provide  an  opportunity  to  modify  any  of  these  program  constants,  and  then  finally 
link  in  one  of  the  major  computer  programs  such  as  SITE  PREP,  MEAS ,  or  REWORK. 
The  annotated  printout  for  the  loader  program  appears  with  the  SITE  PREP  program 
that  follows. 

6.3    The  Site  Preparation  Program  and  Annotated  Printout 

One  purpose  of  the  site  preparation  program  (SITE  PREP)  is  to  anticipate 
measurement  conditions  and  to  prepare  the  daily  measurement  tapes  before  travel- 
ing to  a  measurement  site.     The  second  purpose  of  the  SITE  PREP  program  is  as  an 
aid  to  double  checking  the  measurement  conditions  after  a  site  measurement 
analysis  is  finished  and  to  provide  a  computer  printout  of  the  final  measurement 
conditions  in  an  easier  to  read  format.     An  additional  use  of  SITE  PREP  is  to 
set  up  site  parameters  or  error  assumptions  for  a  data  rework. 

The  normal  means  of  loading  and  using  SITE  PREP  is  covered  on  the  annotated 
printout  in  section  11.2.     At  TRAP,  option  "3  =  KEY  LIST"  prints  out  the  key 
functions  on  this  program,  option  "2  =  LK  MEAS"  can  be  used  to  exit  SITE  PREP 
and  link  in  the  MEAS  program,  and  option  "3  =  LK  REWORK"  can  be  used  to  exit 
SITE  PREP  and  link  in  the  rework  program. 

The  major  features  available  on  SITE  PREP  are  (1)  Enter  site  data  and 
sun/moon  almanac  data  to  be  stored  onto  the  daily  MEAS  cassette  tapes,  (2) 
printout  of  the  site  and  star  data  for  measurement  documentation,   (3)  printout 
of  expected/actual  measurement  conditions  and  errors  using  Cassiopeia  A  to 
measure  G/T,   (4)  printout  of  measurement  conditions  using  the  alternate  stars, 
Cygnus  A,  Taurus  A,  or  Orion  A,  and  (5)  graph  the  elevation  of  Cas  A,  Cyg  A,  Tau 
A,  Ori  A,  Sun  and  Moon,  and  tabulate  the  azumuth  and  elevation  of  Cas  A  versus 
Greenwich  Mean  Time  (GMT) . 
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SITE  PREP 


LuFin 


[SITE:  hr£r)^ITE  DfiTRC  L  u-  I HT  >  5=E.KT  >  1 0 
FKiji'i  iJbMi'r  CHhNGE  0PTiijHO3=He>?3 

ii-j.  i 


Nt;3lH.84     LUHUER     Ol-rti"-  T2-F0: 
.ETHS     5£RlftL  /ViJAjsSK 


X.  fi4;yye£>Ti-4  J  iii-4 


o  y  i  n    -tt  t 


r.Ufi  o 


L.-To.  b.-T 
53  dB/K     40.  10  dB--'K 


Id  i3  id  ;d  |]i  |d  jd  Id  !d  |c  id  |B  |d  id  |d  Id  |d  |d  id  Id  id  jd  |d  |d  jd  |d  |d  (a  !□  [B  id  Id  Id  jtl  g  jd     i^yM  id  jd  [d  |d  id  [d  ;d  jd  |d  id  jd  |d  id  Id  Id  (d  Id  [d  fl  Is  |d  jd  |d  |d  Id  id  id  |d  Id  [d  |d  |d  id  |d  [d  Id  id  Id  |d  jd 

PROG  CONS" 


tiz:  0,b5 

B6:  7.59224E-n:; 

E  :  8.67349 


B3:  0.93 
B9-  162.444 


-rfts  <;v^-,y  -..v.^.  ois..^  /iU^ 


:l;  4.75340E+iH 
:i=i;  x9-4^:'; 


70=9624 


i  9  r  b  .  9  2 


ii.j-  y.ai29 
Ii0:   0. 816515 


G4:  6.9326SE-0C 
G  :  1237710 


g5 :   4.61  m52:c.-04 


C4;  rY.4i! 
C7:  0.23 


1 . 30254E-03 


Hi:  0.0S7726 


H5:  1 


H9;  i'c^i.m'-i 


M5:  4.779 
W6-  3.924 
M  :  10232.9 


Rb"  0.9i-y 
r  i  Q  '         Q  d  o 


L7:  4.50759 


ri7:  1.957 


Hi:  6 
H  :  1 


0  1  ■ 

U  9  - 

N6:  3 


K7:  500 
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SITE  PREP  (cont) 


Id  I  d  id  Id  Id  Id  Id  I  cl  I  d  I S  I  d  I  d  I  cl  i  d  !  d  i  d  I  d  I  d  fd  I  d  i  d  j  d  |ij  |  d  iTl  Id]:;  |,1  \j  |  M  iTi  \  3  Id  i  d  |  li  ;Ii  j  d  I  d  I  d  |Tj  I  d  |  d  |  a  |  d  I  d  1  d  |  d  I  ri  i  d  i  d  I  c1 1 J  i  d  ;  d  i  d  I  d  Ij  I5  ^  J  ;  =  I  d  I  d  hi  I  d  I  d  ip  ij-  i]i  ij?  i?  id  id  id  id  id  |  d  id  :  d  id  |  d 
^      KEVJ/MP         5/*^      rneP  TAPE 

•Jf-       /MSanT  Afp'^OPHiATS:  U  A'       f^^^s)      7~Afe       Q<uff~t^    -t-i.^*^**^         a-^cicK.^  <La.Ajt*iL>) 


CHhHi:E  RUH/riHT£/SITE5  ]-','Ei' 


1  ■. 1 1  1 1  1 1 1_'  i_  1        1 1  ■_  ,■  •    -. ' 

-; '  -.' 

M 1 J  H  T  H  (  =  H  IJ )  H  0  W :   D  E  C '?  M  iM 

' .. ' 

Dl^'r  OF  MONTH':;  =NO:.iHOW: 

2  '  ■■  ]  0 

Dh'i'  of  NEEK(  =HC>H0W: 

THU'"'  i  LIE" 

PROJ  #•;;  =HC)HOH:   27b.  5 

4i:;i7'-'.;:,'.:  ,541 :;. 

LOCflTiuH';  =Ho:>HOW;  ft. 

IiETRIi  K  FlMi'  1t1 

■"CFiMP  ROBbRiS 

'  fiHTtti 

SITE:W.   LOHi:(  =HC  :  77 

.41:5     '''1213. 75;; 

SITE:H.LnT<   =NC):  39.4 

43     '\  J  J .  734 

SITE:HLTa:N>'::   ^HO:  n. 

1  i"i  7           .  ;j  1^ ': j 

HEW  F.-EW.' ElEV.  i-lHT  uOl,'! 

■ , ,  ;    ,  I                :  ; 

l-J                ':'  1 

CEHTER  frei;!'.:ghz:";:  =tjij  ' 

ERR  IH  FREiJcV).;  :=NC:'- 

i:ii .  0  i  '■' 

BHHDNiriTHaiHZ)  <   =NC)  : 

■J  b  J 

ELEVdiEi:)  c  =NC  ':  5 

HHT  rUHh  ';FT)(  =HC;':  t 

3  ':' 

l=flPR  EFFj2=nHT  HPBW,:: 

^CHVL  hPBN'-:   -HC  ■ 

:  u  '"1 

RPERTURE  EFFIi::lENi::Y(  - 

Nlj;':  i;1.bj 

HPBW  ERR':  IS,  =HC): 

1.43  ■:■ 

RNT  FT  ERR;  l=IiEG?  3-MiFB 


Dhb'::  =HC):  0.0129 


Ml. 


RNT  PT  ERR  co r res Pond j  t 


do/ 


t  1 1. 


0.  l; 


'804       DB:0  =  TF' 


-    l  u   .J-  !    ■ZKK-.  ■    T  . 1 S/SOR'.:  4i-'T3 )    of  0.1 


3F;5;:;,-'3n4 


F'.  Y  Hi  ,-,i-l  J  M 


C  H  fl  H  E :  1  =  "i  y  Y-.  >  5  2  =  G  ■ '  I  ':.  D  E:  >  ■ ,  ^ 
G/T  <  DB  >  = ':.  =NC  > :  4@.  6999873 
CHRHGE:  1=G.  Tflj  2  =  TH'::  =:4-<C:': 
G/TR'::dB/K::"::  =HC>:  32.74400 
RNBIEHT  TEMP(F)(  =HC>:  30. 
DEW  PT  TENP':;F;":-  -HC):  4G.2 
EfiTER  SUN/MOON  HLMINH'-  '^\\  ~' 


-Ni. 


FOLLOW  I HG   INPUTS  RRE  IH  2  RhRTS:lf 

h:  rit  r  f    dS'H    O  f  id    n  1  r  i 


IF  DEC  IS [South 


■i  b  0 


SUH     :GHH  li"  0  GNT'::  ^NC:? 
MIH':;  -HC):   O  '"'54.7 

UN     :GHh  0  12  GNT':;  ^=Ni: 
MIH':   -HC>:   0  '"'55.0 
H.HEC  0  0  GMT':   =Ni::;:' : -2i  .  94ii3 
MIH(  -HC);   0  '''SLS 
H.DEC  0  12  GMT'::  =NC::':  17.459b 
MHK  =HC:5:   U  •''39.7 
MO  OH  :GHh  0  0  GMT'::  =NC 
MIH'::  =HC::' :   O        '''SS.  1 
MOOH  :GHfl  0  12  GMT'; 
MIH'::  =HC):   0  '"'38.7 
H.DEC  0  0  GMTr   =Hrj:  3.4' 
MIH':  =HC::':   O  '"'bTl! 
H.DEC  0   12  GMT'-:  =MC 
MIH'.:  ^nlC):   0        ■'■17.  b 
HOR  PhRhLLR:-:';  -HC:':  0.9 
MIH<  =^HC::':   0  ■'■57.4 
HUE    '•pH^v'S'-i  11 


4 


4  44 


zi^  2  <a. 


RR  iiMrii':0- 
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SITE  PREP  (cont) 


UBS  IB.  07     SITE  PREP     ■Ll-Fl,-:;  T2-FL,*::  X .  04<  0002  >T2 -4 .  L 1 -4 


Svin  #6.09  RUN  1 

PROG     2,-'0.54n  rplMP  ROyERlS,  Hfrr#l 

Tut:     i  y  i ■  1^'  n h  i  i  j       1977.35 s 

7.550  GO.O  Ft   DISH  G/To.  G  T 

32. 74  dB  F     40.  10  dO 

g  id  id  Id  5 1?  id  Id  Id  i5  !fl  1?  1  a  iB  I  d  Id  I?  1?  y  '  S '  J  '3  ■ ; r  F '  F '  '  '  ^ '  0  J ':.  0  0  '5  0  0  0  0  0  0  0  0  0  5  0  ■  J  0 ' ii'  0  i?'  0  0:'  C '  S  0     0  (?  Si?  0  0  i  ?'  0  0 

SITE:   W.   LONG  H.   LHT  flLTITUIit  GHh  TO^riPlLF  0  O  GMT 

128.753  d  e  ■?  >:  5 .  7  3  4  d  e  9  0 .  3  F  9  k  i  ■ ;  2  7 .  6  S  id  d  e-  =? 

^CS-  ic0 

|5 1  tl  I  d  1  d  I  d  I  d  1  d  I  d  I  d  1  d  I  d  I  d  1  d  I  d  I  d  l5 1  d  i  d  1  d  I  d  (9  li?  F  0     ?  0  i  i?  0  '5    0  0 

" "   '  fluf  LihTFi' 

STAR  FLUX  in  P.O.  RRHGEvGHr;-^  SIZEd'iini     SPEC   I  HE  EX 

1  CPS  H-*^     3154  +-     4.5  y.  0 
_  1 9  b  5 .  0    ^0  .  9  T"  +  ~  rO .  O  5     /  V  r 

^T(.i,is)/io  ^T{i,nyio«  <-TCijiV//oo 

2  CVG  H        2250  +-     4.5  0 

3  TflU  H         1024  +-     4.5  y.  0 

4  OR  I  R  420  +-     H.5  0 

5  SUH        325000  +-     7.0  °;  0 

G     MuOH  1S81  +-     7.9  F     0      2  F':::       2  TO  lO       32.00        2-000  +-  O.FFO 


J  FIl: 

1  TO 

10 

1    ij  n  I 

2  TO 

10 

1  h^^Z 

2  TO 

10 

3  Gi-iz 

3  TO 

10 

1  GHz 

1  TO 

10 

2  T  0 

4  .  b  ti 

'■1 .  k:  3  6 

i  

>O„02:; 

1 .  60 

-- 1  .  0  9  0   i-  - 

0 .  0  2  0 

4.00 

-0.2  6 3  + - 

ti .  0  2  0 

3 .  5  0 
3'  2  .  0  0 

0  .  0  0  0  - 

2.000  + - 

0  ■  0  3  Z' 
0 .  Gi  0  5 

PROG  FONSTS 

H     T  C  H  J  1  >       S  ( H  5  1 )     T H  ?  3 )         T  ( H  !■  1 3 )     T  ( H  ?  1 9-^-20       T  ( H  9 )     T  v  H ,  6  )       T'  <  h  ■  7 
T<Hj15)     T(Nj1F;:'  T(H!l7>  T':N.4:'  r(H?5 


lofhtiom     nisc  DhTR 

T  R  R  E  P  0  C  H     <  D  R  Y  S  R  F  T'  E  R  1 9  7  7 ,  O  >  S  0 1.  H  R  E  F'  i. J  C  H         ( D  fi  V  S  R  F  f  ::■  R  1 9  7  ? .  0 ) 

1977. 35S                    130  1970.923  -^29 

RT.fi S C          N .   Li e F .  L I N E fl R  P 0 L Z  P 0 L 2  R N G 

GHR  0  0  GHT     H.DFF  0  0  GHR  -Hr          H.  DEC,.  Mr  HOR  PRLF  PHR-F 

350.59  di;-^5    ^53.69  dt-^  Si.  5       +-   ^0.0  ■.        ^40.0       'i >0.0  jjEG 

299.67  do-~      40.66  d;:-"'  S.y      n-        O.O  '.  146.0       +■-     0.0  DEG 

83.23  de?      22.00  di?g  7.0      +-        O.O  143.0      -i—     0.0  DEG 


STRR: 

SOLAR 

1 

CflS  fl 

CVG  fl 

TflU  fl 

4 

OR  I  fl 

cr 

■J 

SUH 

6 

HO  OH 

33.53  de-9      -5.40  de^  O.O       +-        0.0  ".  O.O       +-  O.O  DEG 

180.91  dt-g       17.53  de-^i         15.000  dt?      O.Oll  O.OOO  dt^<       O  dav 

269.64  d e  -i     -- 11.10  di  s  4  .501  d ^  ?  x» O  .  1   1   d  9  - 0 .  9  ^5  7  d o  -vi  -2  2  <  J o. ^ 

^Tft,*J//eoo  ^n^^/iV/^fo  Cj^s^/jy/eoo  ^TCt.^it) 


PROG  FUHSTS 

H     Ta-M)  S(H.2>  S<H-3>  Ta^,ll;'         TUIh  12.'  Tai.  13)  T(Hji4 
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SITE  PREP  (cont) 


W  B  S  IB.  87     '3 1  T  E  F'  R  E  P     ( .D 1  -  F  J  l: J  2  f  \  >■  .  y  4  :  K  i  e  0  2  >  T  2  -  4  I)  i  -  4 


"";  ,'  ■  FROG     27i::„54:i  CRHP  POEERTS,  fiHl^l 

THE:      1077  N/iV   Iti  "    1977. 550: 

F  7.5501  Qui    20.i'  Ft  ulSH  G/To.  G/T 

<^I>  0;£.  74  dB  -4<     40,  10  dB  - K 

TYPICFIL  VhLUEO;  tor  G-'T  MEhoNJPENENT  us  in-?  CflS  H 

G  T  RPER  EPF        RHli  EPF        FlNT  HPBPI  C01.;VL  HPBF!        EFF  RRER 

6 1 .  0: -4  d B       1  3  3  ,  1   Y       v\  .  .0 2. 2 2  -J  „  y  8  u .  1 3 7  1   .J e  g        y  „  1 3  2  2  d 1 9         1  7 2  .  S  fi  1 2 

iBtLiiQ  r  JBL  -33  :Befyep  3/6>e> 

Rriienna  Elev  -     5,0  d est 

PfiRRPlETER       ■      '  ERR  TO  G/T  " 


F       FPEQUENCV   M;,r|:;:::.  F  7.558  +-     8.01   ':f0  +-     8.88  y.  e0 

3       FLU 7   (F.U.-iot(  22 'U  '      5(/;^5o2 ,  3  " +--     5.38  '  S  +-     5,38  %  S 

TCont )   =         34.  3  R  (y-U*«T 

Xi       =   l.S0:2E-e5  I-  U-On-T/G, 
Y       V--F ROTOR  /  i  .  iOb  +■-     8.18  ".CS  +-     8.64  '.C9**ry 

YCdB     =     8.  743  dB  t6*UiJy 
K 1     H  T  N  R  B  2  0  R'  R  T  1  0  H  F-  fH  0  T  i j  R:         K/  i- i  .  0'  1  8  +■       4  .  '^j  5     £  <  +  -     4.95  e.> 

o  X  V   p  f  i  0,  t,  t.  n 0  .  0!  2  9  4  d  B  «  y  *  4  y 

I '1 0.  t  €■  r"  0.  t- 1.  n  ~  8  .  8  Oi  2  2  d  B  /  i ;  i .  :  ■  1 1 2  GS'iHSi-Si*'-^ 

lii 0. 1 i "  d e n £  =     7 .  3  g r i ■  ■ " i ■  i  f  2    L 7 

o.tn  bri.sht.-^:  25.  £  K  B-f 

site   alt     ■--     8.  Of?;?  i  l  l  CjS 

o.pib  tenp     -  30.3  P  ACj'J/'-S' 

dew  poii  u-po  4i:.7.  :  ■  F  AC^)/'-* 

K3     iaFFU3+-*riT/0v.  1.  f.  c    J.        K«:i.0fc:.2  ^       12.03  ".E^  +--   12.83  >.E» 

K 9     R E F' R H 2 0  .  1  2  r  1  ' I  .'?  -  1.  )      %9  i;) .  9 7 6  -!        8 .  4 5     £*?  +-     8.4 5i 

Ist  coruit:    1.8155  18 

2rid  const :  o.OiOOi? 


2     SIRR  3HHKE  '0 
4-'^i8.4:-.7i.-i.:: 

KLJ.908  +- 

1 , 

14 

1 

14 

7  62 

HPBN  (+-  l„43 

:  ;  332 

3     B  Nil  RID  EFFECTS 

FRCTOR 

K  J  1.008  +- 

8 . 

00 

".  £3 

4— 

6 

Pi  8 

7fJ 

bondi'ildth   =  5. 

5  W  l\2: 

4  niFF  SYSTEM  TP 

5  RHT  R01HT(  +  --  0 

I'll' 

.015U  '..its 

Kf  :  .  000  +-- 
Kri  ,  008  +-- 

Oi . 

0  i 

":,  ey- 
7  e.s- 

+  - 

8 

87 
81 

7  es^ 

or  U/T  date  ■ 

i  1;  =:   ■!       8  . 

,29dPHI 

b     RHT  R0LRR17HTI 

ON  RRiOI 

/<6l.008  +■- 

Ol . 

'.  E6 

+  - 

8 . 

7  E< 

7     SYS'TEM  RESPONi- 

E  l--f-!01' 

«r  1 .  0o8  +-- 

7  ez 

+  - 

7  C7 

1  n  s  t.  r  P  IaI  r  r 

■  1-  0.21 

I07  'CI 

Y   (  Y  - 1   -  €■ .  J  r- : 

tiauss  cur i 

J.  i:    1       2.  Oi 

}J\  AZ 

0.     HDIiEn  riOISE  (K 

HI  723. 3  ^  

8 . 

P3 

+  - 

60 

71^ 

ToTFiL  ERROR?   ■:^iuu,d   ■  un       h.i.  Itmi.   "■.  reifr  err  +-  21.19 
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SITE  PREP  Ccont) 


STORE  GoT^N:y  =  Ni:i.5  =  E;;T?  1M=IMT'    =ir  ■:  -^U  ^  states    yne  oat^   ^  HJfJLMEAi)  :Lf*. 

LIST  RLTERHRTE  STRRS  .  n^M  I'J  -  -  .^^^^^/^    X^yf^  -rUX.  J^^jU^  

HBSlB.e?     SITE  PREP       Dl-Fli:    T2--i-  l./-  :^  04  : 6502  yj.?  -  4  ?  u  ■ --4 


S  i  RR 

1  CRS  ri 

2  CYG  R 

3  TRU  fi 

4  OR  I  H 

5  SUN 

6  MOuH 


PROG     £76.5411  ORMP  ROBERTS!  HhT#i 

TUE:     1977  MRV   IS     <  1977.358) 
^.550  CHr.    60. U  F'  LISH 


FLUX   in  F. 


243  +- 

420  +- 
:E+07  +- 
i!6305  +- 


T(arrr 


G.--Tii 
4  dB. 


RUN  1 


C--T 
40.  10  dB.-K 


dE 


y  1  ( K ) 


U/fffV    «2  <  flfir    OF    FHn/t  our  is  f^eAHimuZii^ 


E-S  FLOW 

E-F  FREQUENCY 

E-Y  Y-FRCTOR 

E-Kl  RTH  TRRHS  FflCT 

E-K2  STRR  SHRPE 

E-K3  BHTiNE  EFFECTS 

E-K4  -TIFF  S  i'ST   I EMP 

E-K5  HNJEMNR  POIHl 

E-Kb  RNT  P0LMR2 

E~K7  SYST  RESPUMSE 

E-K3  RTil  DIFFUS 

E-K9  HTM  REFRC 
E-To.       NOISE  REIi 

TOTRL  LINEAR  SUM 

TOTRL  OURLRRTIC  SUM 


C'l'G  H 

8.  SO 
0.  08 

4,90  " 
1.14  • 

0.00  " 

0.16: 
3 .  0 1  : 
0 .  3b  - 

12.03  : 
0.46  : 

0.60  ' 

16]46 


TRU  F 


0  -  i  iO 

fl  .  r'  I 

0 .  24 
0 0  0 
0 .  86 
2: .  0  i 

2 .  60 
12.  03 
0.46 
0 .  6u 

;';S .  70 


ENT  ERRORS: 
OR  I  R 
i  0  ' 


Od-- 


yo 
0 .  00 
0 .  09 
3.01 

0 .  3  5 

12.  03 
0 .  4  6 

0 .  60 

31  .  02 
1  4 .  6 1 


Ml. 

HJ!4  / 

0  \5  0 

0 

9  o/-; 

0/ 

4y 

/  9  y. 

r9  5 

0 .  7'  2  \: 

45 

0  .  00 

/  0 

0  0  % 

0.00  J:\ 

/  0 

0 1 
01 

0  .  3?  '/.  / 

12S 

0 

0  3  " . 
Mb  ••. 

0 .  4  /  '■; 
0 .  'Ai 

0 

2  1 
.  13 

I 
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SITE  PREP  (cont) 


EL  EV 


GMT  PPIHT  OUi  a 


HESlB.e?     SITE  PRLf 


1 


■T2-4.  Iil-4 


#  =  CRS  H 
o  =  MOiJH 


;MT' 

0 


10 
11 

1£ 
13 
1.4 
15 

t&_ 
17 

19 

20 
21 


P  R  )  G     2 ,  ■'  i ,  5  4  1  I  L  hi  [1  r'  R  ij  E  E  R 1 S 

TUE:      l/T"  Mrii    iO     >  1977.353' 
7.550  GHz-   bH.iJ  Ft  riSH 


RITT#i 


G/Ta 
32.74  dB-K 


RUN  1 


G/T 
40. 10  dB/K 


U'l'G  H  +  =   THU  Fi 

30^!RCE  El.  EV de-? ) 


.   =  OR  I  R 


10 

I 


40 


60 
I 


■-11.-1 


tt 


s  # 

# 


+ 
I 
! 
I 
I 
I 

r 

!  0 
I 

I 


I; 

!  + 


I 

l! 
I 
I 
I 
t 

\  X 

[ 
I 


SUN 


HOON 

LOCAL 


:.    =  SUM 

CAS    A  AHTenn^ 
Poiu TINS     c©o«  r« 


C  H  'i 

.  CI 

Ri 

^  0 

1  S  .  2  i 

1  J  ,  f 

-33.3 .  4  c 

1 

12.79 

0  V  b  .  -f  4 

1  U  .  -J  C 

3  3  9 .  b  1 ' 

1-1  ,  .J  7* 

4    .  1  U 

iLT  1*4 

■-' 

7 .  0ii 
5 .  o 

■:i4t' .  i  0 

cr  1-4     .4  .4 

.1 .  0  4 

S  4 

4 

4  .  t'  J 

-1  cr  r.     i  ^ 

■4  .  b  b 

5 .  Uo 

■J  .  ?  U 

Q    0  ■-' 

b 

-r-      i  ."i 
.    .  1  ^ 

1    .  .J  J 

O  .  7  1 

1  r  .  i  4 

r 

10.  67 

20.56 

1  2 .  96 

23.  7 S 

15.55 

18.43 

29.  53 

9 

21.54 

32.  03 

■24.  SS 

34.23 

10 

2;  -; .  3i9 

36.  13 

32!  05 

37.  63 

11 

35.  S3 

38.  S5 

39.  70 

39.  59 

12 

43.  60 

39.  30 

47.  49 

39.  40 

-1 1-1     -1  cr 

13 

1  *' 

55!  02 

V  0  .  .1  J 
3b.  15 

14 

5:-::.  43 

32 .  36 

61 .  59 

15 

64.  17 

21  ."69 

66,  03 

13.52 

lb 

66.  97 

4.  00 

66 .  Sb 

354. 03 

17 

6-5.  73 

344.73 

63.  71 

336. 39 

IS 

6  1 .  0 1 

330. 80 

326. 3S 

19 

54.29 

323. 35 

50.  56 

321.45 

20 

46.  72 

320. 46 

4    .  0  E' 

320. 19 

21 

320.52 

35.  0  7 

321 . 35 

:3 1.31 

322. 60 
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SITE  PREP  Ccont) 


24 


24 


2y.9o 
17. 63 


338.45 
351.00 


FOR 


RUfJ  Tape 


e=RSTRT?l=LK  MEhS?2  =  Lk  FliRK 
CHdHGE  RUN.--IjHTE/  Hl  TE^  I=^rE:K 


LIST"  =NC 


VEfiR<  =NC>HOW:  1977? 

HuNTH<  =HC>H0W:  NhY? 

DfiY  OF  MONTH<  =HC>H014s  iuvll 

DRY  OF  WEE^      =HC>HOi!J  TUE^HEl! 

PROJ  it   =   :  276.5411^ 

_::^TIONt   ^HCjHOW:   CRHP  ROBERTSj  hnTsI 

e;~e;u.  lgng<  =-hc)5  120.753 

S;TE:N.LRT<  =NC>:  35.734 

SITE^  HL"^— -M  '' =NCj:   a.  369 


NEW   F.-b..  -RNi    COriV^.l-Vco  -  -r 

RNT  PI  E-"  -i  :--::EG»2=^HPBW''  =UC:>:  t? 
CHRNGE:  1=T^k.-I   2=G.^'T<BB><  =HC>^  W 
CHRMGE:  l=G.^Tfl?   2=TH';  =NC):   O  V 
fiMBIEHT  TEHPCFK  =HC>:  80.3  ? 
DEW  FT  TEnP<F)<  =NC> s   46.2  ? 
EHTER  SUH 'MOON  RLMINftC  DRIP.  (  1  VET  "• 


FOLLOulING  INPUTS  RRE  IH  2- PfiRTS:  tst  =dess  2nd=riin 
IF  DEC  IS  South:   enter  de?  and  i-un  NEbRTIVE 

SUH     :GHfi  @  O  GMTC  =HC> :   i30.91i  VlSB 
riIH<  =NC>:   @  V55.3 

SUN     ;GHH  §  12  GMT<  =HC>^   368.921  ?0 

MIH<  =NC>J   0  ?55.5 

N.DEC  §  a  GMTf  =HC>:  17.5316 

MIH(   =NC>5   0  ?47.5 

N.DEC  @  12  GMT<  =NC>:   17.9236  ■?i7 

MIN(  =NC5:   0  V55.2 

HOQN  :GHfl  §  0  GMK  =HC>:   £69.635  3257 
MIHC  =HC>i   0  V43.K 

MOON  :GHfi  §  12  GHTC  =NC>:  431.325  372 

nlN    =HC>5  0  ?7.2 

N.DEC  §  8  GHTc:  =HC>  :  -  i  i.  iei6  '7 

t1IN<  =HC>:   0  V23.9 

H.DEC  @  12  GMTC  =HC>;  5.5S633  "--5 

NIN<  =NC>:  0        '^26. 5 

hOR  FHRflLLRXf  =NC>J  0. 

MIN<  =HC>:   0  V56.G 

RGP   =TH--s.r   =HC>:   22  '^VV  


FRT  SITE-SThR  DRTR<Ci=Ha: 


NBS1B.07     SITE  PREP     ^_Dl-Fl2:  T2-ri2: 


K.04<yeO2>T2-45Bi-4 


"Sn  -if   C- .  ts  ? 


RUN 


PROG    276-5411  RHP  ROBERTS,  fiNT#l 

I^LD:      1977  HiiV  11     v  ^977.361^ 

7.550  GHz J   60.0  Ft  DISH  G  Ta  G^T 

32.74  dB^K  46.  18  dB^'K 


r  'J      =ri  .-J 
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6 . 4    The  MEAS  Program  and  the  Summary  Data  Tape 


The  purpose  of  the  measurement  program  is  to  collect  and  validate  data  to 
be  used  in  the  rework  program.     The  measurement  program  collects  three  types  of 
data:     sky  profile  data;  star  cuts  used  to  measure  G/T,  antenna  half  power  beam 
width  (HPBW) ,  and  G/T  ;  and  satellite  power  data  used  to  calculate  C/kT  and 
EIRP. 

6.4.1    The  Standard  Check,  and  Providing  the  Proper  Measurement  Conditions 

Periodically  throughout  all  of  the  measurement  routines  contained  in  the 
ETMS  program  MEAS,  a  check  procedure  is  initiated  to  verify  that  the  proper 
measurement  conditions  exist  for  a  valid  measurement,  and  to  provide  documentary 
evidence  that  the  ETMS  is  operating  satisfactorily.     The  standard  check  contains 
9  pieces  of  information  labeled  as  follows:  BRG  PWR,  BRG  PWR+a,  PWR+a/STD,  STD, 
Ta#,  MANL,  PRGM,  STD  CK,  and  FLTR. 

6.4.1.1    Meaning  of  Labels,  and  Normal  Conditions 

BRG  PWR  is  the  power  incident  on  the  NBS  type  IV  power  bridge  due  to  the 
output  of  the  earth  terminal  after  being  attenuated,  amplified,  and  filtered 
through  the  ETMS  control  unit  when  the  standard  attenuator  is  out,  and  both 
microwave  noise  add  noise  sources  are  off.     For  normal  operating  conditions, 
this  power  level  is  between  0.66  mW  and  0.48  mW  if  BRG  PWR  is  greater  than 
BRG  PWR+a;  otherwise  BRG  PWR  should  be  greater  than  0.12  mW. 

BRG  PRW+a  is  the  power  incident  on  the  NBS  type  IV  bridge  due  to  the 
output  of  the  earth  terminal  passing  through  the  ETMS  unit  under  the  same  con- 
ditions as  for  BRG  PRW  except  that  one  or  both  of  the  microwave  noise  add 
sources  are  commanded  ON,  and  if  PRU+a/STD  =  1,   then  the  signal  has  been  atten- 
uated by  the  standard  attenuator.     Which  noise  add  sources  are  commanded  ON  is 
indicated  under  Ta#.     If  Ta#  =  1,  then  only  noise  add  #1  is  commanded  ON.  If 
Ta#  =  2,  then  only  noise  add  #2  is  commanded  ON.     If  Ta#  =  0,  then  both  noise 
add  #1  and  noise  add  #2  are  commanded  ON.     For  normal  operating  conditions,  the 
BRG  PWR+a  power  level  is  between  0.66  mW  and  0.48  mW  unless  BRG  PWR  is  greater. 
In  the  latter  case  BRG  PWR+a  should  be  greater  than  0.24  mW. 

STD  is  the  assumed  absolute  attenuation  of  the  standard  attenuator  (i.e., 
STD  =  4  implies  a  6.02  dB  standard  attenuator). 
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MANL  is  the  attenuation  of  the  manual  input  attenuator  in  the  "ETMS  control 
unit."     The  value  of  the  manual  attenuator  is  entered  via  the  calculator  key- 
board.    There  is  no  computer  read  on  the  input  attenuation  value,   so  the  oper- 
ator must  be  careful  to  record  any  change.     This  is  done  via  the  special  Key  15. 
Normally  the  MANL  attenuator  is  adjusted  so  that  the  program  attenuator  is 
reasonably  away  from  its  extreme  attenuation  limits   (viz.,   0  dB  and  15  dB) . 

PRGM  is  the  attenuation  of  the  urogram  attenuator  in  the  "ETMS  Control 
Unit."  This  value  is  set  by  the  calculator  in  an  attempt  to  keep  the  input 
power  levels  in  the  normal  range. 

STD  CK  is  the  measured  attenuation  minus  the  assumed  attenuation  of  the 
standard  attenuator  contained  in  the  ETMS  control  unit.     On  the  average  the 
absolute  magnitude  of  STD  CK  is  normally  less  than  0.02  dB  but  because  noise 
signals  are  used  in  the  test  it  will  sometimes  be  as  great  at  0.05  dB. 

FLTR  is  a  number  which  indicates  which  filter  is  being  used  within  the 
"ETMS  Control  Unit."    The  nominal  identification  of  the  filters  is  as  follows: 


FLTR  Number  Center  Frequency  Bandwidth 

1  30  MHz  2.5MHz 

2  70  1 

3  70  2.5 

4  70  5.5 


6.4.1.2    Adjusting  STD  CK 

It  is  important  that  the  assumed  magnitude  of  the  standard  attenuator  (A3) 
is  close  to  the  true  value  because  the  standard  attenuator  is  inserted  each  time 
the  noise  add  is  turned  on  in  order  to  keep  the  type  IV  power  bridge  in  its  most 
accurate  range.     Thus  to  have  an  accurate  knowledge  of  the  earth  terminal  signal 
plus  noise  add  power,   the  assumed  attenuation  of  the  standard  attenuator  must  be 
accurate.     STD  CK  is  the  best  overall  indicator  of  the  "health"  of  the  measure- 
ment process.     The  STD  CK  can  fall  out  of  normal  because  the  attenuation  of 
standard  changes  due  to  temperature  changes,  or  because  the  two  relays  that 
switch  the  standard  attenuator  become  faulty,   or  because  the  RF  control  unit 
amplifiers  are  nonlinear,  or  the  earth  terminal  gain  is  unstable  during  the 
measurement  cycle,  or  any  other  number  of  reasons. 
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There  is  provision  in  the  EQUIP  CHECK  program  to  adjust  the  value  of  A3, 
but  if  while  using  the  MEAS  program  the  average  STD  CK  should  be  adjusted  closer 
to  zero,  I  suggest  the  following  procedure.     (1)  Stop  the  program  (e.g.,  press- 
ing the  END  key  on  the  calculator  keyboard),   (2)  via  the  keyboard  enter  A3 
(i.e.,  press  key  "A,"  then  key  "3,"  then  the  key  "EXECUTE").     In  the  computer 
display  will  be  the  current  value  of  A3,    (3)  press  key  "RECALL."     In  the  display 
should  appear  "A3."     (4)  Press  key  "=,"  then  enter  the  new  value  you  wish  for  A3 
and  press  "EXECUTE."    STD  CK  is  the  measured  value  minus  the  assumed  value  of 
the  standard  attenuation  expressed  in  decibels,  so  if  the  STD  CK  is  averaging 
say  0.1  dB,  then  you  would  want  to  increase  A3  by  2.3%  (i.e.,  if  originally  A3  = 
4.000,  then  new  A3  =  4.092).     (5)  To  check  the  new  value  of  A3,  add  the  follow- 
ing program  to  the  end  of  the  existing  program. 

9000    Q  =  FND0  +  FNDl 

9010    Q  =  FNUl 

9020  Print 

9030    go  to  9010 

(6)     The  program  in  (5)  repeatedly  runs  the  standard  check.     To  use  it  you  enter 
via  the  keyboard  "CONT  9000,"  then  press  "EXCECUTE."    When  you  are  satisfied  of 
the  new  average  value  for  STD  CK,  press  the  key  "STOP"  twice.     If  the  new  STD  CK 
average  is  satisfactorily  close  to  zero,  you  can  erase  your  temporary  program  by 
entering  "DEL  9000,"  then  press  "EXECUTE."    Otherwise  repeat  steps  (1),  (2), 
(3),   (4)  and  (6). 

6.4.1.3    "NOT  NORMAL"  Display 

If  during  the  standard  check  one  of  the  measurement  conditions  is  not 
normal,   then  the  computer  will  stop  with  the  display  "NOT  NORMAL  (1=ADJT) 
(  =  NC):0?"    Specifically,  one  of  the  following  conditions  is  not  met. 

(1)  PRGM  between  2dB  and  lOdB 

(2)  (BRG  PWR+a)/(BRG  PWR)  <  4 

(3)  (BRG  PWR) /(BRG  PWR-i-a)  <  4 

(4)  STD  CK  <|0.05dB| 

If  the  operator  chooses  to  continue  with  the  conditions  "as  is,"  then  he  presses 
the  space  bar,  then  "EXECUTE."    On  the  other  hand,  if  he  wishes  to  correct  the 
operating  condition,  he  enters  "1,"  "EXECUTE."    The  operator  will  then  be  given 
an  opportunity  to  change  (a)  the  value  of  the  ETMS  input  attenuator,   (b)  the 
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noise  add  source,  and/or  (c)  whether  the  standard  attenuator  is  inserted  when 
the  noise  add  source  is  turned  on. 


Condition  Not  Met 


Changes  to  Consider 


1 


a 


2  or  3 


b,c 


4 


change  A3   (see  =9.1.2) 


6.4.2     Establishing  the  Antenna  Biases 


The  G/T  measureinent  routine  does  not  operate  well  unless  the  star  center 
prediction  is  well  within  the  half  power  beanwidth  (HPB'.n)  of  the  antenna.  This 
normally  requires  that  the  computer-predicted  azunuth  and  elevation  angles  be 
biased  in  order  to  obtain  the  needea  earth  terminal  azumuth,   elevation  command 
angles.     The  need  for  the  bias  corrections  is  due  to  an  unknovm  mix  of  situa- 
tions such  as  antenna  bore  sight  errors,   elevation  dependence  feed  sag,  atmos- 
pheric refraction  errors,   errors  in  t'.ie  site  coordinates,   and  error  in  time. 
The  first  step  is  to  find  the  star. 


With  the  ETMS  connected  to  a  dovm  converter  output  of  the  earth  terminal, 
adjust  the  ETMS  input  attenuator  with  the  meter  bypass  in  the  BYPASS  position 
until  the  output  meter  is  midscale  (at  0)  on  the  meter  x  1  scale.     Then  switch 
the  meter  scale  to  x.l  and  with  the  meter  offset  knob  recenter  the  m.eter  read- 
ing.    If  any  of  the  four  pointing  biases   (hour  angle,   declination  angle,  azumuth, 
or  elevation)  are  currently  in  the  program.,   it  is  usually  best  to  zero  them 
using  special  function  Key  5.     Next  press  special  function  Key  4  and  start  the 
star  fix  routine  (normally  for  star  --l  =  Cas  A)  .     This  routine  displays  the 
predicted  azumuth  and  elevation  angle  for  the  star,   and  this  prediction  is 
updated  about  every  10  seconds.     Command  the  antennas  to  the  predicted  pointing 
angles  adjusting  the  meter  offset  or  sensitivity  as  needed;   search  for  pointing 
angle  which  gives  the  maximum  star  output.     Com.pare  the  antenna  pointing  posi- 
tion readout  with  the  predicted  pointing.     Stop  the  star  fix  routines  by  press- 
ing the  "STOP"  key  twice;  insert  the  appropriate  AZ  and  EL  biases  via  Key  5. 
Again  restart  the  Star  Fix  routine   (Key  4)  and  verify  that  the  antenna  pointing 
position  indicators  agree  with  the  biased  pointing  prediction  displayed  by  the 


6.4.2.1    Finding  the  Star 


ETMS. 
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6.4.2.2    What  to  Do  if  You  Cannot  Find  the  Star 

If  for  some  reason  you  cannot  find  the  star  using  the  above  routine,  try 
the  following  check  list. 

(1)     If  the  antenna  elevation  angle  is  below  15  degrees,  and  there  are 
unusual  atmospheric  conditions,   the  refractive  corrections  may  be  incorrect,  or 
if  there  is  an  obstruction  in  or  near  the  line  of  sight,   switch  to  a  star  with  a 
larger  elevation  angle.      (2)  Check  that  the  earth  terminal  down  converter  output 
is  connected  to  the  ETMS  control  unit  input.     To  double  check,   turn  on  and  off 
noise  add  #1   (via  keyboard,  FNX82  and  FNX83,  or  via  program  switches,  82  and  83) 
and  observe  change  in  ETMS  output  meter.      (3)  Compare  the  predicted  Cas  A 
azumuth  and  elevation  angles  with  those  generated  before  the  trip  with  the  SITE 
PREP  Program.     If  an  obvious  difference  exists,   the  wrong  site  data  may  have 
been  entered,  or  perhaps  there  is  a  computer  load  problem.     If  it  looks  like  a 
computer  load  problem,   turn  the  calculator  off,  and  start  up  all  over  again. 
(4)  Check  that  the  time  is  correct.     The  clock  should  read  Greenwich  Mean  Time, 
not  local  time.     The  date  from  which  the  star  positions  are  calculated  is  the 
date  in  the  page  heading,  not  the  one  set  in  the  clock  unit,  and  it  should  be 
the  proper  day  in  Greenwich,   England.     To  double  check  that  the  correct  date  is 
in  the  calculator,  gain  keyboard  control  of  the  calculator   (denoted  by  the  lazy 
T  in  the  disply),   enter  "C6,"  press  "EXECUTE."     In  the  disply  will  be  the  Green- 
wich hour  angle  (GHA)  to  Aries  at  0  GMT  expressed  in  decimal  degrees.  Using  "The 
Nautical  Almanac"  or  "The  Air  Almanac"  of  the  proper  year,   look  up  the  GHA  to 
Aries  at  0  hr  GMT.     In  the  Almanacs  this  will  be  expressed  in  degrees  and 
decimal  minutes.     Divide  the  decimal  minutes  listed  in  the  Almanac  by  60  and  add 
to  the  listed  degrees  to  obtain  GHA  to  Aries  at  OGMT  expressed  in  decimal  degrees. 
This  should  agree  with  the  computer  constant  C6;   if  not  double  check  the  value 
obtained  in  the  Almanac.     If  they  still  disagree,   the  wrong  site  data  was  loaded. 
If  only  the  day  is  incorrect,  you  can  correct  the  computer  value  of  C6  ("RECALL," 

"=,"  enter  new  value,   "EXECUTE,"  or  "C6  =  "--.  ,"  "EXECUTE")  and  look  for  the 

star  again.     (5)  Check  that  the  site  coordinates  are  correct.     In  a  manner 
similar  to   (4)  above,  check  the  computer  constants  C4  =  West  Longitude  of  the 
site  in  decimal  degrees,  and  C5  =  North  Latitude  of  the  site  in  decimal  degrees. 
If  the  site  is  at  East  of  the  zero  Longitude,   C4  should  be  a  negative  number. 
If  the  site  is  South  of  the  Equator,   C5  should  be  negative. 
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6.4.3    Sky  Profile 

The  sky  profile  option  is  selected  at  TRAP  via  option  ISKY.     A  sky  profile 
is  a  series  of  sky  temperature  measurements  made  at  various  elevations  along  the 
path  that  Cas  A  will  take.     The  measurement  results  are  then  least  squares  fit 
to  a  constant  plus  a  cosecant  of  elevation  term.     The  purpose  of  the  sky  profile 
is  threefold.     First,  it  yields  information  concerning  atmospheric  loss. 
Secondly,   the  curve  fit  parameters  are  used  to  correct  for  the  change  in  sky 
background  temperature  as  the  various  star  cuts  are  taken  to  determine  G/T. 
Lastly,   the  sky  profile  results  are  used  to  identify  when  any  unusual  changes  in 
atmospheric  conditions  occur. 

6.4.4     The  G/T  Measurem-ent 

Before  the  G/T  measurement  routine  can  succeed,   the  ETMS  manual  input 
attenuator  needs  to  be  properly  set,   the  noise  add  sources  functioning  approp- 
riately, and  the  antenna  bias  corrections  established  as  discussed  in  the  pre- 
ceding paragraphs.  Once  this  is  done,   the  G/T  measurement  routine  is  initiated 
by  selecting  the  "2G/T"  option  at  TPvAP.     One  measurement  set  consists  of  6  cuts. 
For  the  first  cut,  the  antenna  is  pointed  and  braked  at  the  cold  sky  two  degrees 
offset  from  the  path  of  Cas    A.     A  "cut"  consists  of  approximately  30  sequential 
power  measurements  taken  at  six-second  intervals  on  the  output  of  the  earth 
terminal.     The  purpose  of  the  sky  cut  is  to  compare  the  current  sky  temperature 
with  the  earlier  sky  profile  results.     This  helps  identify  atmospheric  changes 
and/or  interference  situations. 

For  the  remaining  5  cuts,   the  antenna  is  pointed  to  a  computed  coordinate 
position  so  that  the  radio  star  Cas  A  drifts  through  the  antenna  beam  in  equi- 
distant,  spaced  cuts.     After  each  cut,   a  parabolic  curve  is  fit  to  those  mea- 
surement points  when  the  radio  star  is  predicted  to  lie  between  the  half  power 
beam  width  (HPBW)  points  of  the  antenna  pattern.     Cas  A  will  remain  between  the 
HPBW  points  for  11  successive  measurements   (66  seconds  of  time).     These  eleven 
points  are  curve  fit  to  a  parabola,   and  the  discrepancy  between  the  time  the 
star  was  predicted  to  be  centered  in  the  antenna  pattern  and  the  time  the  star 
was  actually  centered  is  used  to  calculate  and  print  out  the  equivalent  antenna 
hour  angle  offset.     If  it  is  desired  that  a  new  hour  angle  bias  be  entered  for 
improving  the  predicting  of  the  time  of  the  star  maximum.   Key  5  is  pressed  and 
the  new  hour  angle  bias  entered.     The  hour  angle  bias   (or  declination  angle 
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bias)  can  be  entered  at  anytime  without  invalidating  the  measurement  data. 
Remember  however,  azumuth  or  elevation  biases  can  only  be  entered  between 
measurement  sets ;   otherwise  the  antenna  declination  offsets  between  cuts  are 
incorrectly  calculated  and  the  two-dimensional  curve  fit  to  the  data  is  in- 
correct, which  invalidates  the  entire  measurement  set. 

After  the  last  cut  in  a  measurement  set,   the  calculator  fits  a  parabola  to 
the  maximum  of  the  prior  store  cuts  versus  declination  offset  from  the  unbiased 
predicted  star  center.     The  difference  between  the  unbiased  predicted  declina- 
tion angle  for  a  star  maximum  and  the  actual  declination  angle  for  the  star 
maximum  is  printed  out.     If  it  is  desired  that  a  new  declination  angle  bias  be 
entered  for  improving  the  biased  prediction  of  the  declination  angle  for  star 
maximum.  Key  5  is  pressed  and  the  new  declination  angle  bias  entered.  The 
declination  angle  bias  (or  hour  angle  bias)  can  be  entered  at  anytime  without 
invalidating  the  measurement  set   (but  remember  -  do  not  change  an  azumuth  or 
elevation  bias  during  a  measurement  set).     It  is  best  to  wait  until  the  measure- 
ment set  is  stored  on  magnetic  tape  before  changing  the  declination  bias.  If 
the  bias  is  changed  before  the  measurement  set  is  stored,   the  most  graceful  way 
to  continue  is  to  press  Key  10  (shift  plus  f^)   to  store  the  data. 

When  all  the  data  for  a  particular  run  have  been  taken^  Key  19  (Last  Meas) 
is  used  to  store  the  summary  information  and  the  computer  program.     When  all  the 
information  has  been  stored  onto  the  cassettes,  NBS  recommends  the  computer 
program  be  listed  out. 

After  the  program  is  listed  out,  the  rework  program  can  be  loaded  at  TRAP 
using  the  option  "4LNK. " 

6.4.5     The  EIRP  and  C/kT  Measurement 

The  EIRP  or  C/kT  measurement  is  initiated  by  selecting  the  "3  EIRP"  option 
at  TRAP.     The  EIRP  or  C/kT  measurement  routine  uses  measurement  of  power  at  a 
point  in  the  satellite  spectrum  free  of  signals  within  the  bandwidth  selected, 
and  a  measurement  of  power  with  the  satellite  signal  centered  in  the  ETMS  filter 
bandpass.     The  narrowest  filter  provided  has  a  nominal  bandwidth  of  1  MHz.  The 
measurements  of  EIRP  and  C/kT  were  not  specified  as  being  part  of  the  ETMS 
package,  and  these  measurements  have  not  been  engineered  nor  programmed  for  the 
inexperienced  metrologist.     The  program  that  exists  was  developed  to  collect 
sufficient  data  for  NBS  metrologists  for  accurate  measurements  of  EIRP  and  C/kT, 
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but  the  accuracy  considerations  and  the  neasurement  precautions  required  for 
accurate  EIRP  and  C/kT  measurements  are  not  dealt  v;ith  in  this  manual. 

6.4.6    Data  Storage  on  the  Run  Tape,   and  the  Summary  Tape 

Ideally,  each  set  of  measurement  data  is  recorded  twice,  once  on  the  run 
cassette  tape  (which  contains  the  MEAS  program)  and  secondly  on  the  summary 
tape.     The  run  tape  has  the  measurement  program.,   the  site  data,   the  star  data, 
the  measurement  conditions,  and  all  of  the  measurement  results  for  one  partic- 
ular run  all  recorded  on  it,  and  it  is  intended  to  be  an  archives  tape  which  is 
write  protected  as  soon  as  a  run  is  finished.     In  contrast,   the  summary  tape  is 
a  working  tape.     The  measurement  data  from  several  runs  can  be  accum.ulated  onto 
the  tape,  and  the  rework  program  updates  the  summary  tape  files  with  the  latest 
results . 

The  particular  file  on  the  run  tape  on  which  data  is  stored  depends  on  the 
set  number  (computer  variable  is  X7 ) .     In  turn,   N7  is  determined  by  the  run 
number   (computer  variable  is  N)  which  is  controlled  by  the  ET^'IS  operator.     It  is 
possible  to  overwrite  a  "run"  data  file  by  intentionally  or  inadvertently  re- 
using a  series  of  N  values. 

The  summ.ary  data  tape  files  are  filled  sequentially.     Every  store  operation 
is  stored  in  the  next  available  file. 

The  reason  for  storing  the  data  twice  is  to  avoid  losing  data  when  cassette 
recording  errors  are  encountered   (ERROR  59).     This  occurs  because  of  a  flaw  in 
the  tape,   or  unclean  recording  head,  or  other  causes.     If  the  problem,  occurs 
during  the  read  operation,   the  file  can  sometimes  be  recovered  by  cleaning  the 
read  head  and  then  rereading  the  file,  but  usually  that  data  file  is  lost. 

6.4.7     Changing  the  Run  or  Summary  Data  Tapes 

When  the  run  tape  or  summary  tape  data  files  are  full,   the  operator  is 
notified  and  the  program  autom.aticaily  performs  the  "Last  Measurement"  routine 
of  storing  the  summary  data,   etc.     To  continue  on  with  the  measurement  process 
without  reloading  the  MEAS  program,   a  new  run  and/or  summary  tape  needs  to  be 
inserted  and  the  appropriate  changes  made  to  the  computer  variables  so  the  data 
store  locations  will  be  appropriate  for  the  new  tape.     I-Thenever  insertion  of  a 
new  run  or  summary  tape  is  desired,   the  "5  NEW  TAPE"  option  is  selected  at  TRAP 
(e.g.  Key  0)  and  the  appropriate  entries  made  in  response  to  the  computer- 
generated  questions. 
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'  6.4.8     The  Use  of  the  Special  Function  Keys 

In  the  MEAS  program,  the  special  function  keys  found  In  the  upper  left-hand 
corner  of  the  calculator  are  important  for  the  normal  operation  of  the  measure- 
ment.    The  ten  special  function  keys  are  labeled  f^,   f^' *    '    •'   ^g*  Twenty 
special  functions  are  available  by  using  the  above  keys  in  conjunction  with  the 
shift  key.     A  special  function  can  be  activated  anytime  the  calculator  is  stopped 
(by  pressing  the  stop  key)  or  waiting  for  an  input. 

For  convenience,  the  routine  activated  by  pressing  f^  is  denoted  as  Key  0, 
and  so  forth  through  Key  9.     Key  10  is  the  routine  activated  by  pressing  the 
shift  key  and  the  special  function  key  f^,  and  so  forth  through  Key  19.  The 
routines  associated  with  the  special  function  kej's  for  the  MEAS  program  are 
described  in  the  following  paragraphs. 

Key  0  sets  the  MEAS  program  to  "the  restart  alternative  position"  TRAP, 
namely  the  position  in  the  program  that  chooses  the  major  program  option.  The 
options  in  the  MEAS  program  are  "0  MASTER  RESTART,"  which  is  used  to  initialize 
certain  program  constants.     These  constants  need  only  be  initialized  once,  and 
this  is  done  automatically  when  the  program  is  loaded.     "0  MASTER  RESTART"  is 
used  primarily  for  the  case  when  the  calculator  gets  hung  up  waiting  for  a 
return  flag  from  the  digital  voltmeter.     This  is  a  calculator  quirk  that  some- 
times occurs  on  the  first  command  to  read  the  voltmeter.     The  operator  is  warned 
of  this  problem  on  the  printout  so  no  special  concern  for  this  option  is  neces- 
sary.    The  "1  SKY"  option  initiates  the  sky  profile  measurement  routine,   "2  G/T" 
initiates  the  G/T  measurement  routine,   "3  EIRP"  initiates  the  EIRP,  C/kT  mea- 
surement routine,   "4  LNK"  deletes  the  MEAS  program  and  links  in  REWORK  program, 
and  "5  NEW  TAPE"  changes  the  calculator  constants  to  store  data  to  the  proper 
files  on  a  new  tape. 

Key  1  is  used  to  restart  a  "cut"  in  the  G/T  measurement  routine.     This  key 
typically  is  used  after  the  operator  realizes  he  has  missed  the  antenna  pointing 
and  needs  to  start  the  measurement  over  again. 

Key  2  is  used  to  restart  a  measurement  set  in  the  EIRP  measurement  routine. 

Key  3  is  used  to  refit  a  parabola  to  the  results  of  a  set  of  five  cuts. 
This  key  is  used  when  for  some  reason  one  of  the  measurement  cuts  is  replaced 
and  there  is  no  need  to  remeasure  the  remaining  cuts. 

Key  4  initiates  the  star  fix  routine,  and  Key  5  is  used  to  enter  new  antenna 
biases  and  is  discussed  in  paragraph  9.2. 
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Kev  &  is  used  to  enter  into  the  cor:puter  program  a  change  in  the  ETMS  input 
attenuator  or  a  change  in  the  filter  being  used. 

Key  7  is  used  to  change  the  estimated  magnitude  of  the  noise  add  reference, 
T  ,  which  changes  the  scale  factor  for  the  data  collecting  graphs. 

Key  8  is  used  to  ch-ange  the  estimated  value  for  the  system  temperature 

relative  to  the  noise  add  reference,   T/T  ,  both  its  zenith  value,  and  the  coef- 

a 

ficient  of  the  cosecant  of  the  elevation  angle.     T/T    determines  the  zero  values 

a 

for  the  data  collecting  graph.     Because  T/T    is  calculated  automatically  from 

3. 

the  sky  profile  measurement,  and  because  the  zenith  value  of  T/T     is  recalcu- 
lated  after  each  cold  sky  cut,   there  is  not  much  reason  to  reenter  a  new  value. 
However,  when  the  measurem.ent  frequency  is  changed,   T/T    can  be  somewhat  in 
error,  and  sometimes  it  is  convenient  to  manually  correct  the  value. 

Key  9  is  used  to  change  vrhether  the  6  dB  standard  attenuator  is  switched  in 
when  the  noise  add  source  is  on. 

Key  10  is  used  to  store  a  partial  measurer^ent  set.     For  example,  a  single 
additional  cold  sky  cut  may  be  taken  for  a  record  concerning  the  atmospheric 
conditions . 

Key  11  is  used  to  store  the  star  and  site  parameters,   and  the  current 
measurement  program  onto  the  run  tape.     Key  12  stores  the  summiar}'  data  matrix  M, 
and  the  program  constants  matrix  X  onto  the  summary  data  tape. 

Key  13  is  used  to  list  out  all  of  the  data  contained  in  the  data  summary 
tape.     Key  14  is  used  to  list  out  the  data  contained  in  the  current  data  matrix 
D. 

Key  15  is  used  to  enter  a  new  measurem.ent  frequency  and  corrects  the  fre- 
quency dependent  parameters  such  as  star  flux. 

Key  16  is  used  to  change  the  number  of  points  used  in  the  parabolic  fit 
routine.     For  Cas  A,   11  points  are  normally  used.     Because  the  fitting  routine 
works  best  when  the  star  is  between  the  HPBW  points,   fewer  points  are  used  for 
other  stars. 

Key  17  is  used  primarily  as  an  alternate  way  to  calculate  the  magnitude  of 
the  noise  add,  T  ,  which  in  turn  adjusts  the  scale  factor  of  the  data  collecting 

3. 

graphs.     Because  the  magnitude  of  G/T    is  calculated  after  one  measurement  set 

3. 

is  finished,   this  value  of  G/T    can  be  entered  via  Kev  17  and  used  to  calculate 

a 

T    by  using  a  value  for  the  antenna  gain  based  on  the  antenna  diameter  and  the 
a  ° 

operating  frequency. 
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Key  18  is  used  to  change  whether  noise  diode  //I,  diode  //2,   or  both  diodes 
are  used  for  the  noise  add  signal. 

Key  19  is  used  when  the  last  measurement  data  have  been  taken  for  a  parti 
cular  run.     This  key  starts  a  routine  which  stores  the  summary  data,  and  the 
current  programs  onto  the  run  and  summary  data  tapes. 

6.4.9    MEAS  Annotated  Printout 

The  annotated  printout  for  the  MEAS  program  follows.     As  usual,   the  MEAS 
program  is  loaded  by  the  LOADER  program,  which  is  also  included  here. 
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MEAS 


■9i  lAtsenT     nOfJ  CtiBPti}    T/\t>£  /a/ re-K  \'/if u  OAn^rrr 

LORri 

RUN        t  DC  Ti  f'l^s    r/APe  i.i>AoeD 


rich'--  I  SITE  D  H  T  Fi  ( 1  i;i  =  I M  ! ,    F :  T  >  ■  5 
V  P  b  ri  C u  H  S  T  C: Fi fl H G  E  ij  P  T I  n  I  -I  ■  ri = m t-i  ■  n 


ERkuR  59  Iri  LINE  41 '/j  —  Oinrf  i\efi,o  hsad  cjIba^^  i^j^ 
J- UN  I  4  15U         —  /tgM^fo     r<p    ^.»/t£>^    /r  a)»^Ag^>  ■' i 


V'";'   1024       .  1 4  .i 
N  B  '5 1 H .  y  4     L  0  H  Ii  E  R       D 1  -  F  0  >  T  2  -  F  0 :  Y. .  y  Z  <  I)  1  -  4  >  T  2  -  4 


Sysi'i  #  6.09 


■1- 

RUN  ; 

P  R  0  G     2  ?'  6 .  5  4'  1  1  C  fi  i  1 F-'  R  u  B  E  F:  T  S  -   fl  N  T  #  1 

TUE:      197?  MhV   lu     <  1976.470) 

7.551  LHzi   60.0  Ft.  DISH  G.--Tq  G-T 

34.  15  iJB/K     40.  33  dB 

@  IB  id  Id  Id  Id  Id  Id  ip  m  ^,  I],  Id  Id  Id  id  ii,  @  id  IP  id  1^  Id  1^  iti  Id  id  ,s  id  g  Id  id  @  15  ,d  Id  @  I],  Id  §  id  Id  id  id  id  id  ,d  IS  i^,  id  Id  Id  id  id  id  lii  la  IB  Id  Id  Id  id  ,d  Id  id  id  Id  id  Id  Id  id  id  Id  ,d  i;-.  i, 

PRuG  C0NSTS  '  ' 

H4:  b.09 
H?: -17. 55 

B5:  0.190451 
B  :  3.22544 

C4:  122.03 
C7:  0.23 
Co :    6 . y000oE- 03 

D3:  y.6 
Ii9:   0.  18 


G6 :  3 .  0 1 622E-0:; 
H9:  523.6 


fl2: 

2 « 

fl3: 

4.  074 

Fl5: 

6.  24 

H6: 

U .  32 

E2: 

0 .  65 

B3: 

0 .  9  3 

86: 

7. 59224E-03 

B9: 

170. 327 

CI : 

4. 5430OE+13 

C2 : 

1 

C5: 

C  6 : 

270. 3  0  2 

C3: 

6.  1 

C  9 ! 

0 .  2 

1976. 47 

Dl: 

0.  1 

ri2: 

6 

II 5: 

0.015 

Ii3: 

0.  75 

ri0: 

0. 0157S45 

n  : 

60 

Fo: 

0.01 

F  : 

7.  551 

G4: 

6. 53155E-03 

G5: 

1.  11233 

G  : 

1361370 

HI  : 

0 .  3 

H5: 

1 

L5: 

2. 09331 

Lt: 

2 ,  ]  7 

LS: 

1 . 1 1961 

L9: 

0.01 3 

M5: 

4.  779 

M6: 

0 .  973 

MS: 

3.  924 

N9: 

7 .  9  4  9 

M  : 

12234. 3 

Nl: 

6 

H6: 

N  : 

1 

0 1 : 

cr  tr  --i 

04: 

~'   5  i " 

0  9 : 

5.634 

L7:  10.1245 
L   :  -5 


N7:  1.95- 
MO:  6.1 


N7:  500 


06:  1.25 
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MEAS  (cont) 


Pi:  2.375  P4:-5.S14  P6:  S.-G? 

L !  0.0  S  3  Q  7 : '  "  1  „  7  •  :>  2.  y  d  E  U  3  Q  9 :  -  '4  .  7  1 9 

F'  0  i  U .  2  '4  6  Pi 

T    :  ill. 3 11 


IF  HflRljl'ifiRE 


( 1  )  STOP +  S TOP 
(£jKEV  0 
(.3>Q  '.RSTRT> 


fiEM^i^eefi   TO    use    Oreak   pc^r  ssr 

:!  ^^fEREl-iD) =Nl   '  0 


RPE  Eirr?   PIERS  IHTC  ^hC):  1 

  —          aiu    e  rMS  <uo/vr' 

3  P  r  H  f ,  1    [I  E !...  1-1     %  B  P  P   P'  T  S :  PI  Li  l.'.|    ■  "  "  

HDli  2s-hr:    Tu  CPOrr  |./rHlM- 1  :.  ','PS       ..Hf  .  :    a  '  '^U   fj^y.^   ou^t^rz^-^M^c^JUL,  aJUU. 

Xifi-^    ^   ci^  ^u^uA^                 dU^  ^JU.*^     av/^  ^  aJ^.  T-ku^Mxl 

f"|   T  p  :  i         li  ?  pi  r,  p 1  |lj  I?  fi  ,,      =  V  i i:i '^^^^   i::::  ih  "-■  i    .•   I.  i ,       .       i  ■- ■  \  IJ,.       ^  ij  5 7-0  -r  ^.P  L 

mmiii  r'i  i^7;IP  '    ■■-  w:,  ) ;  65 

RU  P:>P  Ri.P:  n  -  ii  1"  ti  7'  l=#i  ? 
IHoPPT  S  i.i  ,  NRcM  T.;RIiiij(   =HC):  1 
TERR  ^ M M i  1 D  0 Pi !  0  ?  1   1' 1 1=1  \\ !.,  C   =  H 3 
i I J  P ! , .  T    ::::  E :[  i-:;  P' ,  A  L  M  p  , ':.  j- '  [E  H    F  R  P  E  -H:  M 


CriS  m:      SL  Itt'.  =M 


□ 


/f^      TBf^r^         l>Bio  potuT      ffiooe  A/oT 


S P:  V !  G H  T  ( HP ;  3 "\  pi F; T  ■>  3  r 0 p ,  E;  1" e ? '■:  4  n  6  ?  l 


1 1  ^  Ci  0 1 1 3  Ri  T  0  ':?  1'?  f-l  W'  ■ 
PI  1  Pin  'j'iPR.:":.   "NC'i  0 


-NO  0 


(713   1024  :::.20:' 
\  1 1; R:  1  3 ,  I) N E:  H S     ■:  U  l  ■■■■   1 A :    T  J 'r  1  2  :  F! .  0  3'   ■  U 1  \  >   "\  2  1 
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MEAS  (cont) 


#  S.yy  kuil 

PRfiG  .:;7b,5411  CM  MP  ROBERT  Si  hNTiU 

THE:  197?'  MH  i'   10  (  10,-'S.47o.' 

7 .  Z  5 1  G  hi  z  H   b  i;i .  6  F'  i;  1)  I  S  h  G  ^ '  1  a  G  '1 

:-4.  15  dB--K     46.  SO  .'IB 

TEMP  DEN  PT.  REL  HUMD  WniER  nEHO        CLOUD  COVER  NINJi 

S0.9  F  4b.  1  F  2S.b  7.4  ■^{-■^  n13  U  O  i'imPi 


ERROR  103  111  LINE  4615    rwf     /tr  />£ad  +>u.  "'^^'^ 

4605  r '  =  '■ , '  0  *  ( 2    -  '•/  y  > . Q 1  *  Fl  [  7  ]  1 0  ti  0  ■■■  ..J 
V9!  V;  01  )  h'-. 7>  5  J 

0  2.4  0  7  0  -  2 .  4  0  7  P  0  F  -  0  6  4  '9  0  0 .    ;";  1  5  7  6  6  1  p! 

—THIS       IS    A     Soob       KE-rBofiUP  comh'MvO  TO     CCeAH   ^' F  i^A/Ajy"  FL^iCi 


F  fl  jJ  0  +  F" ;  ■  D  1  ^ 


1 0  F: '  r  J  2  G '  T'  0  E I F. !  ■>  -I  L.  F 1 1 ;  ?  5  0  F:  ; :    : "  Fl  F'  Fi.  s  ij  R    1  h-:  i  ^    ^^1  ■! 
SOURCE'  CH3  FlF  =NC,'  =  1 
CPiS  Fi:     SETtft.  -140;^:  2 
£  V:  V ;  G  i  ]  T  ( H  R  6 )  ?  S  T'  H  R T  ?  S  T ij  p  ?  3 T  E F'  '■'  4-  j  6  j  i 


CLOUriSfO  TO  9  =  RFlIN>(  =NC) :  0 
NIHIi  <i'iFH)<  =NC>-   0  '■' 
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MEAS  Ccont) 


HBSlC.85  HER'; 


Dl-Fl. 


T3-F-  12 


;!e5  Di- 


T2~4 


#6.09  ,  ^  RUN  Z 

PRUG  276,5411  CRhP  KUEERTS^  HMTttl 

T  U E :  19 7  M  H  v   1 0         19  76.470) 

7.551  GHz.   60.  ti  Ft  DISH  G/To  G/*T 

34.  15  dB  -  K     40.  SS  dB-'K 

TEMP  HEW  FT.  PEL  HUML  NHTER  LENS        CLOUH  COVER  NINB 

80.6  F  45.2  F  23.  S  7.5  ?n  -  ,'it3  O  0  nPh 


ERG  PUR       BRG  PRH  +  o     PWR  +  o-STIi?       S  TD  Ta+F       MflNL       /PPGH\      STD  CK  FLTR 

0.4900nH       0.3327nN  4.0740  0  2dB      I    4dE  j    O.OOlOdB  4 

SET  #  2  CHS  H  ^ci^AJ^ 

1Z                        EL                                                  GNT  T/Ta 
18.9595007           11.19171132  READY? 

4  0.568952386 

25,43772698         15.69755805  RERDY? 

5  0.565235416 

31.12720383        21.36047576  REflPY''' 

-                                                 ■                       6         •  0.567557997 

T-  To.  =  0.5644  +  0 .  OOO;'.  S 1 N  L  '  ^ 
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MEAS  (cont) 


SOURCE:  CRS  fl<  =NC  s  1 
FREGCHhZjV  =HC>:  7551 


#  MEHS  PTS-:   =NC>  ^  3fl 

#  PTS  IN  FIT<  =HC):  11 


CLOUDSO  TO  9=RhIk>':   =x\v.yi   h  vv 
WIND  CMPHK  ^HC>:   8  ?3 

<77  1027  11.25> 
NBSiC.05     riEHS     <D1-F14>  T3-Fi2:  a. 86  <Di-4>  T2-4 

-7- 

Svi,.,  #2=84  *      RUN  2 

PROG     276.5411  CAMP  ROBERTS!  HriT#l 

TUE:     1977  MfiV  18     (   1976. 478) 

7.551  GHz?   68.0  Ft   DISH  G^Ta  G^T 

41.34  dB-  k     43.38  dB^K 

TEMP  DEW  PT.  REL  HUMD  WhTER  DENS         CLOUD  COVER  WIND 

35.  S  F  45.3  F  25.8  7.6  ^rvntS  3  3  r^ph 


NERS         HPBW  TinE'KRS:.'  OFFbET  BZIKUTH  ELEV         CUT     RUN     SET  H 

6sec      0.1371         11.45139  Z.QSOdeg  29.62  60.81  -3227 

T.-Ta  =  0.6353  +  0.80I15-CSC  L 
'TiHB     useo     To     S£T    T/fff    AH  re  f/A 

GCi:i=NEW  HZ:.  EL       =^0^    6      r-  , 

PEHK#      [^tF  eTTS-  -  irrL-TB3--^^'^^:Ti^^^^^  ^W-' 

14         j__  I  O.euOyde^  y.OOayde?  e.COOOd-es  0.08M0dt5 

BRG  PWR       BRG  PRW+a     PWR+ax-STD?       STD  Tcs       MRHL         PRGM         STD  CK  FLTR 

0.5a70riW      S.3S£0r>W  1  4.0S6H  0  4dB  3dB      a.816edB  4 

lEF.n  LEVEL.     100-;  LEVEL  •  K  ¥<DB>       KCP-S)     £<.JN>       T  Ta 

£1.6  276*7  0       O.9530#Tn  5       0.876       1.746         31.5         582       63. S  180.8 
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MEAS  (cont) 


1  u 

I 


■  1 0 


1 4 
-15 
-16 
-1? 
-13 
-19 
28 
21 


24 


TCSKY"' 
H .  f, f 

f.. 


■Tn 


!              1  1 

1         1  i 

r-  i  1^  11 

■1 
1 

h 

■Ir: 

F'  F'  0. 

!  .[■■ 

i-  • : '! : 

.1  ':r 

I  !    h-: '"' 

ti 
iJ 

.  t0C 
.  0 

I  '^j  !:J  7 

I B  1  4 

J  „  6  3 '^4 
" '  :' 

„|..  j 

■ 

-I- 

■  '  " 

'  ■:'  :■■'  :' 1, 

1  j_ 

.  tl  0  r 

4 

0  . 

0  "  -i^  f''3 

J.  I 

0  a 

•  0  .  C  3  6  7 

1  J- 

0  .     -i-  i'J  t;:' 

1  # 

f  {)  •- 

i3 ,  G :  4 

# 

0  . 

8 1  i;j 

0„63r'5 

.ij.  1 

tl-  ! 

"  -■'  - 

i-J  „ 

^  B I  3 

0  .  b:j40 

1 

# 

" 

.  b  0  L- 

■1 
]. 

1:3  :. 

■j  o  1  o 

J  o  1 Z 

': " '::  i 

+  1 

"  '1 1' 

1 

1 

■d  a   b  -J  :  2 

''-  ' 

tr  . 

"    -  z 

ri 

-1'     1  l' 

L  u     ■_■  _■' 

!  It 

0  a 

j:l  rl  k1 

it  1 
fl-  ! 

" 

M  „ 

~;    ■"'  j_ 

"  z ;:| 
':'  ° 

fl- 

B  b  y  ~ 

0i  „ 

-i^    l-J  C' 

tt  1 
■rr  ! 

1 

■  1"' 

0i  D 

j;l  kI 
C\  [.i'j 

":    :. z, 
!■■'"  t^An 

+  1 

0 

0  , 

3314 

0. 6341 

1  + 

0 

4 

0  . 

3301 

fi .  6  3i  3  4 

+ 

0 

0  . 

3    0!  9 

+  I 

0 

.  bPi':: 

1 

0  . 

El  1 6 

0  ,,  6  3 :3  3 

+  \ 

0 

.  60': 

0  . 

3321 

I 

0 

,  60?: 

,..|. 

0  . 

i3 .629  0 

4- 

0 

4 

3  3  0  2 

0„ 6331 

+ 

0 

'3  0  3 

3 .  6  3  3:  i 

-1-  ! 

0 

■  60;:: 

Q 

0  . 

3814 

!  + 

0 

,  60?:: 

3794 

0 . 6409 

I    I ..,.!..  . 


Of-     TH-B  30 


0 .  4:3 


#PTS 
30 


/  r       DEl//  A  Tiev     OF  rri£ 


H 


/3/  DHlOiE 
OV,  //J 

CJL4*.      'YUrU      ^■t^'\  it 
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MEAS  (cont) 


N  <\s  SET#  2 


NBS1C.05     MEflS     <D1-F14)  T3-F12 


1117       OCT    17     II  £-Mr 


h6    ■:Iu-4>  Ti-4 


-fi   #  0.04 


RUN 


'ENP 


PROG     276.5411  CflMP  ROEERTSr  hNT#1 

THE:      1977  HflV   10     (  1973.470) 

7.551  GHz?   60.0  Ft  DISH  G/To.  G.-T 

41.34  dB.-K     43.51  dB.-K 

DEN  PT.  REL  HUMD  WRTER  BEHS        ClOUD  COVER  WIND 

45.3  F  £2.7   ■■.  7.5  9n--fiT3  3  3  nph 


MERS 

HPBW 

TIME':  HPS) 

OFhSE 1 

ri^IMiJTH 

0.  1371 

11.52028 

-0 . 069 de  3 

61-33 

CUT     RUN     SET  N 


GO   t  33-  EL       ^RC  ..•  :  3 


T/To.  =  0.6349  -t-  y.001l5*C3C  L 


ELhPSE 

PERK# 

PTS  EX 

hR  EIh3 

DIL  BIhS  3Z 

B I  R  3 

E :_     X  H  3 

14  sec 

16 

1 

0  .  0000 di£  = 

.  3  3  6  0  a  €  ?  0.0 

000d€  9 

0  .  3 3 0 0 d s 

ERO  LEVEL 

100".  LE^ 

■'EL 

XKK)  K 

'mIiB:'       T'.Li-i  :. 

SCJH) 

T  Tn. 

0.636£*To,  0.'?513*Tn 


2E-05 


1 .  750 


:l  =  6 


63.  t.  100.0 


10 

-11 

-  \  V 

-13 


4  0 
I 


60 
I 


oO 
I 


100 


^  A.^Y^-*'  l*Jt>ICAV    '    -UJ-^'-eA    ^|M»-t/i.Ct,  ^laJI 


PWR#1 

PilRfe2 

P.-Po 

0 . t076 

0. 3304 

0 .  64 

1  2 

0 . 60 4 S 

0 .  3  S  0  £ 

0 .  6  3 

0. 6051 

0 .  63 

0 . 6050 

0 .  63 

45 

6 . 6059 

0 . 3798 

0 .  6  4 

0  1 

0 . 6043 

0. 3316 

3 .  6  3 

3  .  :■  3  3  3 

0 . 62  i  6 

■J .  : 

0. 3351 

'  h. 

■  .  ^    _  4 . 

0  3  3  1  3 

3  -"^  !  S 

» 1 .  3  337 

3  ..  !:  '- 

■  Q 

3  .  . 
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MEAS  (cont) 


■it 

■15 
16 
-17 
■18- 
■19 
-20 
-21 
22 


28 
29 
3B 


#FIT 
1 1 


RNT  HPBU 
0. 12U  de? 


THIS    LS  Afpf>,OK\HsrzLY 
T^f    noun  Atfjiie 


T':ChS  H)-To, 
9.7337  +  -  1.51-. 


i  n  c  r  e  o,  p  H  f^:  B  IRS  1 1  f e  u  I-,  b  i  t  .j  r-  e  h  E  ri  K 
decrease  PECL  BIAS  it    1st  c^jt  loo 


H  (I?  SET# 


>•:;  =NC):  9 


<77   1027   1  1.33:' 
.ril--F14:-  T3-F12:  ■-..06    .ril-4/  T 


.(■■•I  #  5.04 
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MEAS  (cont) 


FROG     276.5411  rHHP  KOBEF:! 

TUE:,:  19??'  MfiY  li-i  ■  1976.470) 
7.j';:'l   GHz?    66.0  Ft  UISH 


HTttl 


TEMP 
SS.9  F 


DEN  FT 


REL.  HUND 


jriTER  DEhh: 
'.3  ^i'l/fit. 


41  .  34 

CLOUIi 


OVER 


43.3]  db/\ 


n  :  l^HEW  riZ?  EL 


TlilE'  l  !R-7 
1  1  ,  5;;-;  194 


OFFSE 
■■-0.  H34d 


ELRPSE 
ISsec 


:LKU 
6.6 


N3 


10 
-11 

-12 
-13 
-14 
-15 
16 
"17 
-13 
- 1 9 
-20 
-21 


24 


LEVEL. 
;;62*Tn 


#FIT 
11 


1"  a  -  d .  6  3  4  9  +  0 .  0 


PEflKtt       PTS  EY:       HR  Ell-iS 
16  1     \     0 .  0  0  0  u  d  5  ■ ;? 


10O"-;  LEVEL 
0. 951S*Tn 


FIT 


HHT  HFBIJ 
0. 132  de^ 


31.  75 
115*CSC  L 


nCL  EIFlS 

0  .  0000deTi 


YCriB) 
1 .  750 


El... 


CUT 
 1 


fE  T       f  I 


HZ  BIR: 
0  .,  0  0  0  fl  i-i 


T'jjfl:: 
:  1 .  i: 


.UHo 
:i50  +  - 


HR  Flf 

0  .  !" 


jc;  OF 

1319 


SET 


EL  EIHS 

0  .  0  0  0  0  ■  :J  P 


To. 

100.  0 


1  00 


F'WR+H 

¥' 

WR#2 

p. 

'  F'  'J. 

0 

.  4304 

0  . 

3034 

0 

.  4331 

0  . 

3  0  2  2 

01 

6424 

0 

.  4303 

0  . 

3027 

0 

.  4319 

0  . 

"i  0  2  2. 

9 

0 

.  4937 

0  . 

3070 

0 

o439 

6 

,  4944 

. 

3050 

0 

S  5  7  2. 

9 

.  50  =-.9 

0  , 

i  0  7  6 

I? 

6  7  3  7 

0 

.  5169 

f  j . 

3  1  1 9 

0 

6320 

0 

.  541  1 

0. 

3166 

0 

7  1 '  6 

0 

.  5673 

0  . 

IJ 

0 

0  . 

3  3  Fi  9 

0 

.  bL:00 

0  . 

3  3  5i  6 

Fi  6  6  0 

0 

.  6505 

0  . 

0 

.  6656 

0  . 

3  '^i-  €  6 

P} . 

0 

0  . 

3740 

0  , 

b  4 

0 

.  5033 

0  . 

3720 

01  . 

0 

.  4349 

0  . 

0 

0 

~.  til  i .™ 

0 

.  55mF 

0  ,, 

i  '2.  yi  3i 

0 

.  5304 

6 . 

:.149 

0  . 

7  0  1  0 

0 

.  5071 

0  . 

3  Fi  7  7 

0  . 

6  7  5  9 

0 

.  5071 

0  . 

i  0  '9  2 

0  . 

6  7  ij  3; 

0 

0  „ 

3  0  C  2 

0  . 

6  5: 4  4 

0 

0  . 

0  . 

0 

0  . 

3037 

0  . 

6 :3  6  9 

0 

0  ■ 

3035 

0. 

6366 

0 

0 . 

0  . 

6393 

0 

0  . 

3024 

0  , 

6431 

0 

.  433^ 

0  . 

0  . 

0 

5  0  2  9' 

0  . 

6  3  9  ?' 

pehf# 

1  A  .  :3  1 


LEVEL 


CHS  H 


increas 
dec  re  as 


e  HR  bi:HS  }.  r   F.'C.4:   before  FEflKlt 
e  DECL  BTfiS   if   Ist  cut   too  dcr.:p 
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MEAS  (cont) 


tt  3.04 


TEMP 
39.  U  F 


F'RQC;     276.,  5  H1  Cri!-r  i''i.;.  E 

TUE:  1977  Nfi'i'  lu  .  19,  ^..  ,  47 
'i\'5'51   GMz?    tiiii.H  r  i:-   LI ::M 


HEM  PT 
45.3  F 


MEFlS  HPBH  TINEdHRS 
bstc       y. 1371         1  1  . 64359 

T/Tn, 

GO  :  1=HEPI  FiZi.  EL       -NC  ' :  3 


PEL  HiJ 


OFFSET 
0 .  OOOcie  3 


T6K  L,E\\i 
5  3i )/rit: 


FlZIliUTH 
31.05 


0.6349  +  ti .  00  1 1'j-: CSC  L 


ELFiPSE 
14£ec. 


PEFlKft  PT3 
1 6  1 


:ErO  L.EVEL  lOO;.  LEVEL 
0 . 6362* T a       0 . 95 1 S*Ta 


FIR  biff; 

Fi .  0  0  0  0  d  1- 


1)1"!,,  BIAS 
Fi .  0 '  ■ ;  0  >:i  t.  ■ -I 


I!  LI 


6  To  F,,  T 

41.34  dB.  |:„     43.31  clB/f 

CFG  Fill  CO'v'EP  FJIIlIi 

(p/t  E  D I  ere-  D  c  e A/  re  «  c- 

UtYrji-I  SET 


M 

i  0 


HZ  BIFIS 
0 .  000  0.: 'i-:  -i 


EL  BIFl? 


crvTtH  cur  PKDicnon/   (^ojyiTs  aRAPH  scALeJ 


2 .  3  2  E  ■■"  0  5i       F) .  o  7  6 


N3 


10 

■1  i 

■12 
■  i  2 

{■i 
■15 

1 6 
•17 
■IS 
■19 


40 


]  00 


ttFIT         nor  iipL|.,| 
]  1  0.  IFF' 


PNR#1 


7>f/S  ifiAeH  U/OOLO  H^Aoe 
BE£tJ     Fl/Ll     SCALC  if 

i.e.. 


I  + 


T ' 

Fl .  c 


riS  H  '  •■  I  a 


PNR#2 
'i     Fl .  ;3  0  2  51 

fl ,  3  0  2 
)     0 ,  3'  0  '3 ,;:! 

0,304  3 
■'     0  .  -3  0 ' '  i  ,■■' 


#  I 

#  I 

tt  I 

#  I 


Fn  MAX 


0 , 

0 

::5 1, 

0  .  3  ti  '3  F; 

i:J  , 

0  „  2 1  A-  2 

F  1 

0  .  3  2  0  3 

0  . 

1 2: 

0, 3267 

0  . 

60 

=1  '■■i 

0 .  3 ,3  2  7 

Fl  „ 

:.;  1  -i  1 

0  . 

6  3 

0. 3406 

0  . 

Fi  . 

6  S 

3.4 

0  .  3  5  0  4 

1  J,  0 

IJ  . 

^  ■  c\ 

0 . 2799 

'3  „ 

0  . 

F:4 

:"  f  i 

0. 2304 

0 . 

0. 2345 

!- 1  „ 

0  . 

*"! 

J  2. 

0  .  2  £;  2  0 

Fi . 

' :  1 

0 . 

7  l-ij 

13  . 

t:i . 

1 7 

Fl . 

0 . 

J. 

2  0 

0. 2741 

0  . 

ij . 

0, 2721 

0  . 

3  4 . '  '  ■■' 

0 . 

4;? 

41 

0 .  2;  6  5  F; 

0  . 

"1     ■;  'i 

0 . 

46 

50 

0. 2617 

0  . 

■■'69  1 

0 . 

56 

0. 3244 

0  , 

0  ,  :32  1  1 

0  , 

0 , 

3  F) 

0. 3142 

0  . 

'■'  Fl  '3 

0  . 

5  F! 

F4 

F ! .  '3 13  ?'  7' 

k' . 

0  . 

Fl  „  3  Fi  2: 7 

Fi . 

Fl ,  '3  F'i  2-  € 

2} , 

0 

4 

Fl .  ,::Fi'3';' 

l:J  . 

1 

,1,  4 

0  .  2:F)3'::j 

I.I  . 

rIF  !-iNi 
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2-IEAS  (cont) 


■11- 


R'jU 


PRGG  276.^41: 
THE:      1-577  Hi-r 
7.551  GHz.    r " 


470> 

G  To  G  T 

41,34  ciB  K     43.51  dB-i 


TEMP 
89.0  F 


BEH  PI. 

45.  S  F 


7.  5  ■•3ri-''f-it>: 


COVER 


3  i-iPh 


—        —  -_r-: 


HERS         HFBii  "        TIMECHRS/  OFFSET  fiZIHUFH          -ELEV         CUT     RUH     SET  H 

6sec       0.1371         11.70167  @.834d6-=?  39.36  t.2.71  1         £         2  11 

 _/^>f5       P{£S'JLTZ      O  fr 


GO  :l=HEW  RZjEL  i  =HC>i 


ELhPSE 


PEflKt 
15 


PTS  EK 


HR  Bias 

e.9800deg 


BCL  BlfiS 


HZ  ElfiS 
0.e0a0ueg 


EL  ElfiS 

0.eeu0de3 


ZERO  LEVEL 
y.6362*Ta 


100';  LEVEL 
0.y5i8*Ta 


Xi<K> 
2.32E-05 


K 

e.376 


Y(De> 
1.750 


T<CHS> 
31.6 


S<JN> 

582 


T 

t3.  b 


To. 

100.0 


0  28 

40               60  80 

100  <5i> 

N3 

I              1              I              1             !     ,  1 

Pl-JR#2 

PxPa 

1 

! 

0.4823 

e.3825 

0.6408 

2 

+ 

0.4830 

e.3031 

0.6391 

0.4317 

0.3035 

0.6352 

4 

0.4KIO 

0.3037 

8.6341 

5 

e, 4966 

0.3859 

0.659i 

6 

0.5367 

0.3984 

0,6721 

7 

0.5135 

8.3108 

8.6892 

S 

0. 5236 

0.3140 

0.6891 

5 

+ 

0.5432 

0.3177 

0.7192 

-10 

t  ! 

0.56S5 

0.3228 

8.7565 

-11 

ft 

0.5969 

0.3302 

0.7924 

-12 

i 

0.6362 

0.3465 

8.8412 

-13 

\  # 

ti.  66  j4 

0.3471 

8.8768 

-14 

!  t 

0.5321 

0.2766 

8.8386 

15 

0. 5310 

0.2772 

0,8315 

-16 

!  # 

0.52&2 

0.2745 

0.8642 

-17 

!  i 

8.5835 

8,2715 

8.8456 

-IS 

!  # 

8. 484? 

8.  i;657 

0.8059 

-19 

t  ! 

0.4637 

8.2603 

8.7727 

-20 

#  ! 

0  .  Di^Ii-J 

U.3287 

8.7358 

21 

0.5386 

8.3150 

6.7012 

22 

+ 

e .  >  ■ 

.  I :  :  4 

8.6983 

23 

+ 

0,6683 

24 

+ 

0. 4936 

8 . 3857 

8.6531 

25 

+ 

0.4325 

0.3834 

0.6^,  8 

26 

T 

0.4Si9 

0. a8z6 

0.63S3 

27 

1 

e.4S26 

8.3833 

8.6377 

28 

+ 

1 

0.4820 

0.3C39 

0.6344 

2? 

+ 

0.  4Clio 

8.30K: 

8.6;i>7 

36 

+ 

!              1              1  III 

0.4324 

8.3031 

0.6379 

#FIT 

HUT  HPBII 

Jif-  ;      .                       -  OFFSLT 

I  -IVEl: 

CHS  R 

li 


0.127 


0. 0802+ ■ 
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MEAS  (cont) 


P  R I J  G     27b.  5  -1 1 1  C  h  N  P  R  n  E.  F  R  T'  3 »   h  N  T  tt  1 

TUE  :      12       MlTi    l^'i         1       .  470  ■ 
7.jSl   GHzi    tiJ.y  Er  lUSH 


G-  To  G 
41 .  S4  dB  K     42.  31  dB-  K 


TEMP 
8  9 .  0  F 


DEN  FT. 
45.3  F 


PEL  HUNIi 


WFiTER  DEFF; 
7  .  5         I'l't  :: 


CLOUD  COVER 


WIND 
3  .,ph 


MEn2  EIPBN 


T  IME'  FiF 
1  1  .  7i21.; 


OFFSET 
U .  U  6  9  lJ  ^1 


FiZj  F;!J1  H 
2 '  .  F  4 


;lev      cut  fun 

5 .  y  5  2  2 


SET  H 
2  12 


GO   :  l^FIEN  RZ-  EL 


T-T> 
=  HCi:  6 


"I    —   n .  I-, 


349   +  0.00115 


ELRPSE 


pEHKtt     PTS  e: 

15  0 


HR  BIAS 
0 .  00OOdt= 


ijCL  ems 

0 .  0uyUi:]e-? 


flZ  BIAS 
0 .  0  0  U  0  d  e  ■-■) 


EL  Bins 

y . 0000de? 


!ERO  LEVEL  100";  LEVEL 
0 .  0362^;  To.       0 .  95 1 9*Ta 


.  f:  ) 
::E-0' 


YdiB'  T(CHS 
1.750  31.6 


S(JH)  T 


To. 

100.  0 


N3 


■10 
■11 

-12 
-13 
-14 

15 
-16 
- 1 7 
-IS 
-19 
-20 

2 1 


#FIT 
1  1 


40 
I 


SO 

I     .  I 


Ht FT  HFBU 
0.  135  ik- 


T<ChS  H 

0 .    7'  5 +  


.■■■Tn 

1 . 47; 


HR  fiWQ  OFFSET 
-O„0O24  de-^ 


1 00 

1 


PNRttl 

PWR#2 

P 

■Po, 

0  . 

4331 

0.30  3  0 

0 

.  6396 

0  . 

4S29 

0. 3026 

0 

.6407 

0  . 

4S30 

0 . 3035 

0 

.  6381 

0  . 

4319 

0 . 3032 

0 

.  6-365 

0  . 

4'^5S 

0 . 3059 

0 

.  6-572 

0. 

5060 

0 . 3099 

0 

.  6654 

0  . 

5072 

0 . 3087 

0 

.6723 

0  . 

51  S3 

0 .311 6 

0 

.  6362 

0  . 

5301 

0. 3138 

0 

.  7046 

0. 

5434 

0. 3176 

0 

.7193 

0. 

5433 

0.3183 

0 

.7170 

0  . 

5541 

0.31 95 

0 

.  7  3  6  9 

0  . 

5634 

0 

0  . 

5310 

0!327i 

0 

.  7679 

0  . 

5954 

0. 3303 

0 

.7384 

0  . 

5947 

0 . 3305 

0 

.  7860 

0  . 

5821 

0 . 3270 

0 

.7719 

0  . 

5692 

0. 3236 

0 

.  7549 

0  . 

55  9 

0 .  :3 1  9  6 

0 

.7429 

0  . 

5.-  -.  0 

0. 3148 

0 

.  7003 

0  . 

51  .;i4 

0. 3122 

0 

.  6866 

0  . 

5070 

0 . 30S6 

0 

.  6723 

0  . 

4949 

0 . 3053 

0 

.  6573 

0  . 

4327 

0. 3031 

0 

0  . 

4816 

0. 3029 

0 

.  6369 

0  . 

4825 

0 . 3036 

0 

.  6365 

0  . 

4822 

0 . 3035 

0 

.  6362 

0  . 

4816 

0 . 3040 

0 

.  63.32 

0  . 

4317 

0 . 3030 

0 

.  6367 

0  . 

0. 3035 

0 

.  6  364 

.flf: 

LEVEL: 

c 

1 

44.3"-; 

i  r-i  1:  r  fi  0  e  H  R  B I R ' ;  i  T   f>  t  0  k  I.  •  e  f  o  r     PER  K  # 
d  i  c  r  e  0.  :v  0  Ti  E 1:  L  B  I  \  \  S  1  f   1  s  t     u  t-   t  o  o  d  e  p 
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MEAS  Ccont) 


102; 


NBSK 


PIERS 


<ril-F14>  T3-F1E: 


1 1 . 47) 

:^^06  <rii-4: 


T2-4 


-13- 

oy^-n   #   3.04  f.iw-i  2 

PROG     276.5411  CRNP  ROBERTS-  HHTttl 

TUE:      1977  NRV   18     (  1976.470;' 

7.551  GHz  J   60.0  Ft   DISH  G.-Tn.  g.-t 

41 , 34  dB ■ K     43. 31  dB/K 

TEMP  DEW  FT.  PEL  HUMD  HATER  DENS        CLOUD  mVEP  HIND 

89.0  F  45.S  ^:  22=6  '.  7,5         ntS  3  3  nPh 

|l|]i|o|did:diriididi3y;&|d|d|3|d|d!5|did 

BEST  FIT  MJR  THE  5  CUrS        Jo~-  lOy  K 

#FIT         RHT  HPPH  T^CflS  RV'Tn  DECL  OFFSET       J.-  To  ELEV         RUN  SET 

5         10.263  de?        0,9162  +  -     1.14"-;  8.005  dt?      0.6362K     62.4^.fg       2  "2 


G  G  T  NEF  Ml  IF 

60.82  dB  42.78  +-  0,18  dE  8,404  K.  Mt2  0.406  K.'Mt2 

§|d|did!d|d|d|d§!diJ|d|u|d|d|dipi]iy|didg 

1 0  0  *  ( D  R  T  Fi  -  F  I  T ) .    M  R  'A  d  T  C  fl  S  R ) .  -  To.)  ' 

CUT  -2  -1  8  1  V 

1.0";  -3.6",  4.6"-;  -2.5;-  0.5"; 

TO  RE  PLACE  R  CUT:'!.:'   KEY   1   then  ■:2.^   KEY  Iup 
REMRRKS:  ■^•"•1  HIS   IS  A  SIMULATION  OF  CAS  A  M 

STORE:    INT  FILE   16  EKl  FILE   11  EXT  SET#  3 

BIR  T-^Tq         CSC  TIME         TEMP  NRTEP  #PTS 

BIRD       COLE       P.^Po.        PMK  dPud.J      CliT  E-C/  i  i     ni 'i  .-t,-,  p„ 

RUii.  SET  STAR       ELFV       C-  T  G  -Tn,         HPBNIM.   HPBHll-2     FPEO     LECL         HEF  [IUP 

2.01  CAS  A   -0,0       0,556         8,001        10,3-13  '^^0,900     7.55r     7.54  3     4.OU0  O.Rm;; 

2.02  CAS  A  62.4     42.734       40.820         0.165   18.263     7.551     O.OOo     0.404  ol^-Ofc 
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MEAS  (cont) 


riftT  ri:  1 


4 


1 I'i  h,  1  *i:.ijt 


194 


1 

-bi 

•  1 1  3 
:16k 


»  UK  i     :  ,  1  'j.;.:'::' 


-47 


~  1 

- 1  1 5 

-  3  0 

1  34 

216 

4  6  9 

i''  2  6 

640 

921 

1340 
—  d.  -i 

1617 
-  2  2 

1406 
-  2 

1  1 46 
-  J  b 

9  2  3 
-47 

6  i  9 
-  y 

512 

209 

i  -SI  ~7 
X  ^-'  1 

6202 

30 

1  1532 

^14:-:.l 

Ar  rSAK 

-124 

29 

-91 

129 

504 

1 150 

1653 

2022 

2516 

3  009 

2301 

1857 

4  02 

5  3  6 

454 

214 

-  b7 

-19 

"l2 

IV3-I 

-  4  Q 

6  2  2'  S 

30 

1 1643 

0 

3  7  0  9 

""r  5 

1390 

13^4 

2364 

34  50 

3890 

2  9  7  9 

2743 

2271 

958 

545 

177 

-59 

6271 

30 

1 1702 

34 

3178 

1469 

-34 

481 

731 

7  3  0 

1 153 

1664 

3140 

3192 

2994 

2296 

1876 

1386 

9  0  4 

748 

424 

-55 

-45 

-96 

-42 

6305 

30 

1 1761 

69 

1937 

1518 

-14 

-  3  9 

256 

r,  s  9 

'"■i  '-i 

1  1 66 

1 127 

1401 

1613 

2  0  ?'  7 

2046 

1854 

1643 

1432 

8  9  2 

694 

--64 

-69 

-115 

-60 

-64 

60 


MEAS  (cont) 


1SKY>£G.-'T  j_r  :      \  i  LlU:  ':.r;h  H  ThPE OF'S TRT  ^   ^^WC' : 
S  L  H  \  '>  T  F:  H  H  b  t  H  i  ij  I  ;:  ! :,  1 1  ■    -  r  i  l'  ) :    4   .  3  4  9  ? 
RUP  GRIN  SLOPE- MHz ^HC'!-  y 
RZ'  LEG>(    =HC-';    29 .  4ti555iii92  ? 
ELaiEGX   =NC;':  15 

NO  I  SL  FiDD  :  0  =  ^t  1         i     1  2-#2  (  ~NC  :   y  '''0 
bird:     SET#'.;  =rli::>:   4  ?3 
C L 0 Li II S  <  y  TO  9 = P H I  fi  (  =  !•  i L  > :  -  8  3 
WIHD  (NPH;".;   =HC:):   0  T'lZ 

CODE!0=SKYj  1=-Fj   2=Rl:k  i?  F>   3=+l- >  4=0THER  =MC 
INSERT  5DB  NHEN  TCRDDX  =NC> :    1  '"1 
FREQ(r1HZ::":   =NC>:   7551  ? 


y .  0635453; 


y 


FLTP :  1  =^21530 j  2=1  §70  j  3  =  2i]i'70  ?  4  =  51?  70 ':. 

NRNL  HTN(dB>':   -NO:  4 

ft  MEfiS  PTS(  =NC>:   SO  ?5 


NBS 10.05  MERS 


(77  1027  12. 10) 
:iil-F14>  T3-F12:  ii.Ob  <Iil-4>  T2-4 


#  3.64 


■14- 


PROG     276.5411  CRMP  ROBERTS?  hHT#1 

THE:      1977  HRY   lO         1976.  h 70) 
7.551  GHz<   60.0  Ft  IJISH 


G/To, 
41.34  dB/K 


dB  K 


TEMP 


9  F 


DEN  PT. 
45. S  F 


REL  HUMD 
25.0  '. 


NRiEP  DEN:; 
7  .  6  •?:'!■■  nt:; 


CLOUD  COVER 


NliTD 

12  r.pF, 


BRG  PNR       BRG  FRUfo.     RNR  +  o.  - STD'^^  STD 
O.4330nN       O.3056nN  1  4.0300 


Tiife       NHNL  PRGM 
0  4dB  4dB 


STD  CK  FL 
0.0166  d B  4 


CODE:  0  =  SKY?  1=-Fii    2-RCR  0  i  -    3  =  -i  F ?  4 -0  i .  > R 


SLRNT  PiTNGE 
4  .  y35E-i-  07Kn 


RZINUTH 
29.  41 


El  E\ 


PGR  F 


BNDND 


..DP 
0 


PUN  SET 


11  TERtt 
4 


NOISE  PN 
5.734  NH^ 


li:t.  lONST 
■0.  1400  Ni-i 


0  .  0060  ;  H,: t 


IjHIN  ■-■LOPE 
y .  L.00u.-Mi-l  ■: 


e:'1,'  P:j 

;..  734  n;-;: 
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MEAS  (cont) 


p..p,;RDD  '  PN^'Sl 

0.fc-;-;731  3.04. 

H.b;:532  3.04 

0.638  J?  --04 

0.64130  3.04 

0.64243  3.04 


i\\ 

IJflL 

pRfiG 

4 

:]B 

4  dB 

1  2  .  1  3  1  f- 

4 

4  dB 

12.  133^- 

4 

OB 

4  dB 

12.1  95'; 

4 

dE 

4  tif-: 

12.  1-^7': 

4 

dB 

4  dB 

1^:.  I  J'-;- 

0.63910  +-  0.5 


040 -.3  +-  0.1 


'  Fl.iF-t;2--NPwi  '  ■ 
4 . 7 5 7 6  4  +-     0 . 
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MEAS  (cont) 


(7?  1027   12. 12) 
NBS  10.05     NEflS     (Dl-FM;-   T3-F12:        ■  A.  06  ■•'Ifl  -  ']  12-4 


#  3.04  f;':U!.i 


P R 0 G     2 7 b .  5 4  1  1  C  Fl rl F'  1^ il  I: ' F': T S  >    Hi) T #  1 

TUF::      197r  MHY   lu     '  L^7G,-\7Ki> 

7.551  IjHzj   F0.0  Ft  PISH  .   G/'lo  G'T 

41  .  2  4-    Cil,2  4<      42.  2  2   J;:'  ^'l: 


TEMP  D  E  N  P  T .  R  E  L.  H I J I  ■1 D  W  ii  T  El  f    2  E  \-\  S        f:  i  ii  I  i  n  f:  i-| f'  f?         i.  |  j;  1 1  j'  i 

85.9  F  45.8  F  25.0  2  7.2  -iK-nt^  i  12  nPh 

(5 1  a  Id  @  Id  Id  \h  Id  I  d  I  d  i  d  |  d  I  d  |  d  |  d  |  d  id  |  d  |  li  |  d  @  @  |]i  |  ii  I  ci  |  d  3 1  d  I  d  id  Id  lit  I  d  iji  Id  Id  Id  id  Q  id  |  d  id  id  fiii  Id    ,  d  id  iji  |  d  I'd  |  d  fi  id  |  d  |  d ;  B  |  lii  ilii  ill  id  id  jij  |i;,  ilj  id  i („  |  d  r  Ij  id  |  V,  - :, , 1:1 , |B  |  ,i  1  ,  d 

0 .  946 :  K3        0 .  99b  :  K9        U .  OWdP  ( o.dd  >  40 .  35*  1 0t6 :  SR        5 .  724 :  BM 

SPhCE  loss  T-'Tci.  OHT/Tq       ONT/SNT       r-c;  EIRP*G-^Ta  C/kT  f<UF-i  SET 

202.12  dB        0.6391         0,0000        8. 6090  0. 00  dBW  0.02  dB  ,••  :■>, 

(3  Id  |B  I  d  §  Id  Id  Id  0  Id  I  d  I  d  |  d  |  d  |i  |  d  |  d  |  d  |  d  |  d  id  |  d  id  |  d  1  d  1  d  |  d  id  Id  id  |  d  @  |  d  |  d  I  d  |  d  I  d  Id  id  id  I  d  I  d  Id  |  d  id  1  d  ■  il  |  d  id  |  d  |  d  id  |  d  |  d  |  d  |ii  |  ri  i !  d  id  Id    id  id.:'  fi  fE,  id  |  d  id  |  d  id  i 'iil  id  Id  |  li  I'ii  i  111  f  d  |  Ij 

REMRRKS:  ■"■SIMULflTIOH  OF  COLD  SKY,   OFF  SATELLITE 

STORE:    INT  FILE   18  EXT  FILE   12  E;^;T  SET#  4 


MRT  ri:    1  2  3  4  5  6  7 

C  -15059       *1500       -3 17-+       -Sl  i^l         J  ibb       -"3170  ~"2K2? 


1  0 


5      S»-  5  ?'       - 1  9  Si        -  i  Si  7 '  IJ       -  .1  ..•  -  F  £;       -  1  9  2  6       -  1 9  2 1 
1944  0       121'::' 2       12iy4       121-2       12198,  12199 

0  0 

— »       483  0*f'*^*'*      u  0  0  0  0 

0  0 

totau    att/v  (Ez-tec) 


^--->     677  0 

0  0 


I  t  t  I  t 

/**         z**         serf.        ftf  s-''" 

/HEAS  /ACAS  MffAJ  MBA  J  MEAJ 
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MEAS  (cont) 


F?ESE.T  MEri?'  l  -^VES  ;'  ■    ^HC;' :  y 
BIF::Ii-     Stiil'    -Ml';  4 
CLUULS':.  0    lU  4 ^  E H  I  N  ' -MC  ' : 

1.1 1  HI;  aiPi-i '  ■■:  =\K  ■  M  ■■"'ly 

CO  in;:  0^::S;V<  1  —  l-  ■•    ,::-R':;P  i'i'  f " 
F P El",  i ■  i H Z  /       i' -i C  '  :   7 5 5  1         '? 7 5 4 k) 


+  Fj  4  =^  0  THLR 


FLi  R  :  1  =-2 30  ^  E~  1  &  r  0  ?  3- 
MHriL  RTr-K^jE) ::.HC  :':  ■■ 
#  MEFiS  PTi(  =HC)-  5 


NBS1C.05     HEfiS     <Iil-F14>  T 


■13:  X.  06  >  T3-4 


#  3.04 


-Ib- 


PROG     £76.541  1  CFlMP  ROBERTS,  fiHTttl 

TUE:      1977  rlFlV   10     (  1976.470) 
7,540  GHz?   60.0  Ft  DISH 


DEW  PT. 
45,3  F 


PEL  HUMD 


TP  LEHi 
5  9ri.-r,t;; 


RU 


To.         ^  G/T 


4. 1 . : 
CLrilJB  COVER 


HI  rill 
10  i-MPri 


BRG  PWR  BRG  PPN  +  o.  F I'J R  +  a / 3 T D STU  Tn.# 
0.5  39  0,v,i..j       0.314  3i'iN  1  4.0300  0 


PRGM        31  D  CK  FLl! 
IdB  4ciB       0.O240dB  4 


CuliE  :  0-SK'i'  ■  1 


SLflHT  RFlllGE 
4.  e35E  +  0  7Fi'i 


RZIHUTFI  ELEV 

3'  .    0  0  1  5  n    0  0 


'  =  RCR  (ii  F?   3--i-F  J  4  =  0THER 


RCR  F 
7. 540t 


BHD  Nil 
>.7  F!Z 


corn. 


MJN 


Fl  LTER# 
4 


0I3E  EM 
,734  MM J 


1st  COf 
■0.  1400 


2nd  CONST 
0  .  0000  rlri.;;1 2 


GHIH  SLOPE 
0.  00  00.- HHi- 


EQIV  BH 
:i.734  rTH: 


P/  P' FIDIJ; 

0, 69756 
0 ,  7  0232 
0 .  7  0  3  3  £ 


PFIR#1 


PNRlr2  MFlNUflL 

8.  12  4  clB 

0  4  dB 


PROG 

4  dB 
A  dB 

4    n  B 


TINE(HRS:: 
12. b5 66 7 
1 3: .  3. 6  0  J  0 


0  .  b  3  7  6  2 
0. 69620 


12  4  di: 

13  4  d! 


4 


1 3. 2613, • 


#FT 


p/P(HDD; 
0 .  69940  +-■■     0 .  5 


pwi  :i;  i  Cr.Fi  ^> 
-i--    0.  1 


(PilF!.  ■  r  HRiM.  >  (imM 
4  .  ,^-'53b  -i   0. 
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MEAS  (cont) 


<77  1027  i2.15> 
NBilCC-i     •■.EiiS     ■xI.i-Fi4;  T2-ri2:  ■'.  65     Z 1--:  J2-4 

-17- 

PRHG    276  =  5411  CHMF  RCEERTs;'  HHTil 

THE:     1977  MRY  10     <  1976.47ei> 

7.540  GHz?   60.  S        lil  r  H  b'  ToL  G  T 

41.33  de.'K     43.28  dB^  K 

TEMP  icy  FT.  kEL  HISMD  IWTER  lEHS        CLOUE  COVER  WINU 

53.  J  -  45. S  F  22. y  >.  7.5  ^n^f:t2  2  IS  P.ph 

3.946:K3        0.996:K9        3.34dP<add>  4@. 35*10t6: SR  5.734!B« 

■-PflrE  LnrW  T-'-Tf  OHT---Ta      ONT---SHT       rc-y  EIF:P*G---Ta  C-'kT  RUN  SET 

'202.11  d&        0.6391        0.6994        1.9944  e.08  dBU  0.00  dB  2  4 


RESlfiRKS :  ?S  1  MULHl  I  OH 

OF  GH 

SATELLITE 

BUT  BELOw  THE 

CHKRIER 

FREO 

STORE:  INT 

FILE  20 

EJC 

T  FILE 

13 

E^T  3ET#  5 

RflT  S5  1 

4 

6 

Q  4 

1  6 

-1"^SS3 

e 

1530 

0 

-2765 

-2761 

-2757 

-2764 

-2767 

0  0 

0 

1 

0 

4 

0 

1097 

1034 

1035 

1093 

1100 

0  0 

0 

0 

0 

-1564 

-1535 

-1528 

-1564 

-1573 

0  0 

0 

-1553 

0 

0 
0 

12257 

12253 

12260 

12263 

12263 

0  0 

0 

524 

0 

e 

0 

0 

0 

0 

0 

0 

0  0 

0 

679 

0 

0 
0 

3 

0 

0  0 

f1 
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MEAS  (cont) 


bird:     SETtt'.:   =MC> :   5  ' 

clol'jj:^  u  to  f'^PiiiiE' -=mc.' -  6 

WIMJj   ■:ilPH''"   =rli.:':    0  1 

C  ij  n  t  ■  1  ■  ■  ^ '. ;  -K ,  V  J  1  -  -  E  "    2.  -  P.  C  f-'  <■}>  f-  f        +•  r"  ?  4  ij  ]■  \  I E  F;  '■.   --  \>.  L 

INSEE  ■    "j'be  UHEr]  T':  hDli  '  ■    ^4;::  ' :    1  ■■■0 

FREC-J-h.::-    -MC':    7'j40         '-'V'j'z  i 

F  L  T  F;  i  1  ■-■  2.  ip  -3  U  ?  2  - 1 1,;' . G  j  3  =  2  0  ^  i  J  <    ■  ■-  ( ? 9     - 1  i  i ,  j  :  4 

nnrlL  f.TN(dB:":   ^4IC'':    4  ?6 

#  NEi-ii  PTi.-..   :^M-|::  >:  5 


(77   1027   12.  18.' 
NESl::  .  05     HEElS     ail-F14  >  T3-  F12;  X.Wb    ::Cl-4>  T: 


#  3.04 


■IS- 


RUN  2 


R  0  Q     2  7  E  .  5  4  1  1  C  M  i  1  f  -'  F:  E  E  E  R  T  S  <   ft  f  H  tt  1 

TUE:      1977  NiVi'   lu  1976.470;' 
7.551  GHz!   60.0  Ft  DISH 


G/Ta  G-T 
41.34  .:iB.  K     43.29  dB. 


"EMP 


.DEN  FT. 
45.  S  F 


PEL  HUMD 


NHTER  DEHS 

7.5      ri  ■■' fi  1 3 


ELOUD  COVER  WIHD 
0  1  fipri 


ERG  PMP       BEG  PREi  +  o.     PNR  +  ':i --S TD'"'       STD  To^ff  NflHL 

0 .  :3 1  --  0 ;  • ,  W       0  .  ?  5  €  4  m  W  0  4 .  0  8  0  0  0  6  d  B 


PRGN        STD  CK  FLTR 
7dE     -0.0030dB  4 


CODE:  0^3EV5  1  =  -Fi  j^l^^RCR 


5=+F, 4=uThER 


SLFiNT  PFl 

MGE 

rCZIMUTH  ELEV 

F 

CP:  F 

BNDWD 

C  0  D ;:. 

RL 

N  SET 

4. 0  35E+0 

7Pn 

2.00  15.00 

.  551 

.  7  nz 

ILlERtt 

EC 

ISE  BW           1st  COHST 

2rid  r. 

UNST 

G 

E  I N 

SLUF'E 

EQI'v 

BW 

4 

7  34  m\z       -0.  14  00  i1H:' 

0  . 

0000 

12 

0 

. 0000/ MHz 

5.  734 

mz 

H3 

P-  F 

CFlIiD:'  RNRftl 

PFi 

Rtt2 

fiN 

UHL 

PROG 

TIME';:HRS:j 

1 

1 .  2 

:3CC0                  b .  27 

1  1 

.  15 

6 

dB 

7  '1 

B 

12. 

31944 

1  .  2 

'-'1 2-  €  3                   b  .  2  7 

1  1 

6 

dB 

, '  r 

B 

12. 

321 1  1 

1  .  2 

Sb55    •              b . 27 

1  1 

.  [4 

h, 

dl::? 

i'  i_ 

12. 

4 

1  .  c. 

C:  b  IJ  4                  6 .  2  b 

1  1 

,  1 4^ 

6 

dB 

7  dB 

12. 

32444 

1 .  2 

34  31             ,  6.27 

1  1 

.  1  1 

dB 

7  dB 

12. 

3261 1 

p.-P',  riDD'  P 

il!:ir  1 

•  mH  -' 

':  F' 

EP#-: 

-PFJRl^ 

1  ':>  K 

nFJ' 

COL. 

5            .!.  . 

22   '        0 .  3  .               6 .  269 

•1 

.  1 

Z'  b  L.:!  '- 

3  +- 

0. 
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MEAS  (cont) 


HBS1C.05     ••£-£  T3-F12:  .  utJ  •■.ril-4;  T2-4 

Sysri  #  3.04  RU-i  3 

PROG  r;flMP  ROBERTS?  HNT#i 

TUE:  :-iri  i    lo     ■:    1376. 4?9> 

f .obi  bHzj   60. y  Ft  DISH  G-Ta  GT 

41.34  dB/K     43.39  dE  k 

TEr-=  DEN  PT.    ^      REL  HUMIi  WfiTER  BENS         r:Lniiri  mVER  I-JIND 

iz.i  F  45.8  F  22.9  Z  7.5  9n/nt3  8  1  ,v,p.h 

6.94e:K3        6. 996: K 9        3.34dP<ndd>  49. 35*19t6: 3R  5.734:6^ 

SPACE  LOSS  1-  la  OHT^Ta      ONT.--SNT       rev  EIRP*G.-'To  C/H  RiiN  -£T 

202.12  dB        0.6391         9.6994        1.9944  33.25  dBN  67.92  dB  2  '5 

REMfiRKSJVSItlULflTED  COMPLETE  MEhSURE?    BUT  ONT  HEhS  ONLY  OH  OHE  SIDE 


STORE:  INT 

FILE  22 

EKT  FILE 

14 

EKT  SET# 

MfiT  n:  i 

2 

4 

-J 

6 

3 

Q 

1 9 

-17800 

0 

1500 
0 

-5026 

-5026 

-5923 

-5031 

-5933 

0 

9 

0 
0 

6 
9 

r.'  --. 

*-   -_i  .II  0 

-2533 

-2541 

0 

0 

CT 

0 

1:3? 

57 

0 

ij 

1994 

13-':- 

1115 

1 :-- :  ^'  1 

1094 

1        r    J  t; 

iCrS 
13.-34 

1129 
12326 

9 

0 

0 

9 

• 

9 
9 

797 
9 

0 

y 

0 

0 

0 

0 

9 

9 

9 

0 

9 

9 
9 

13 

13 

1  3 

13 

9 

0 

0 
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MEAS  (cont) 


RESLT  HEJi'iS'  l^'i'ES)     ^=:NC:':  9 
ElKl;:      SET  ft'.:   =NL>:    7  '?6 
CLOUDS  ( 0  T  Ci  9  =  R  fi  I H  . '  (     |- ■!  i :   :  0 
HI  HI)   ■  MPH  >     =-Ni:;' :  0 

L:  ij  li  E  :  0  =  I- :  V  ■>  1  =  -  ■  f-"  ?    ..i:  -■-  R  i :  P  H  F  <    3  -=  +  f  ■-'  4  =  0  T 1 1  £  R 

INSERT'  5 I'D  Ml  itr!   1   iTDIj'  '    ^=NC :   y  ■•M 

FREn':MHZ) =MC'':    7z5  l  ■■'.•'Sfai 

F  t.  T  R  i  1  =  2  iJ?  3  U  ?  2  =  1  ij?  7  U  ■>  3  2 1::'  ?'  U  <  4  =  5 1= 7  0       U  r  ; 

MR  ML  hTN<dB.)^   ^^-HC;':   6  ■■4 

#  MEMS  PTS'    =HC:'i  5 


(.77   1027  12.2:5) 
M  B  S 1 1:: .  0  5     r^  l  E  H  S     <  L  1  ■■-  F  1   '  -^  J  3  -  F 1 2 :  7. ,  kl  6  <  I)  1  -  \  >  T  2-4 


#  3.04 


RUN 


PROG     276.5411  CflMP  ROBERTS j  HHT#i 

!UE:      1977  NRY   10     (    1070. 47 O) 

7 ,501  G hi z»   00,0  F t   n  1 S H  G /  T a  G T 

41,35  dB/K     43.30  dB/K 


TEMP 


DEW  PT 
45.3  F 


PEL  hiUUD 
20.9 


NFlTER  DENS        CLOUD  .:OvER 

7  .  0    9n  ■■  ri  tO  0 


WIND 
0  i'lPh 


BRG  FNR       BRG  PRW  +  o.     F1.TP  +  a-- STD'-'  STIi 
0  a  5  3  4  0  r  I  I  T       0.32  3  6  n  IT  1  4 .  O  3  0  O 


Tn#      NflNL  PROM 
0  4dB  4dB 


;:TD  CK  FL"^ 
OlOOdB  4 


SLflHT  RFINGE 
4. 035E+07Kn 


CODE:  0  =  SI<Vi.  1=  F 

ELEV 


U 


10  TH 
0  0 


•T-?OR  0  F 


RCR  F 
7, 5610 


■.  =  01  HER 


END  WD 
).7  NZ 


RUN  SET 


ILTERtt 
4 


NOiSE  BN 
5.734  MH: 


1  .St.  CONST 
0.,  1400  NHz 


0-;d    0  0  OS: 
0000  Mri2:t2 


GO  IN  S 
0 .  0  fi  0  0 


EQIV  BN 
^.7::4  ITH 


p.'P' nDD) 

PI 

R#l 

PNR#2 

NO HURL 

PROG 

TIME 

■  HPS 

1 

0 ,  7  6  S  4  7 

3.  47 

4  dB 

12:.^ 

0, 70873 

4  dB 

4  do 

1 2 .  ■ 

3801 

0 .  7  7  0  3  0 

8.45 

4  do 

^1  ciB 

1  2' . 

0  0  0 

4 

0  .  7  t  j '?  3  0 
0. 771 10 

i'l  9 

C'  4  'I  r 

4  (iB 
4  dB 

4  dB 
4  dti 

1 :: .  ^■ 

P.'  F ODIi 
0 .  7  0  '9 1-;^  0   +■  ■■■■     ti . 


PliKtti  'nN  ' 

JO.  jr.     -i 0.  1 


.PI.;P#: 


2  1  0 


fj .  1  ■ 
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MEAS  (cont) 


<  77   102  7"  iZ.  2b.' 
NESlC.yS     MEflS     iDl-Fl-i^  T-5-F12:  V:.i}6   ^1)1-4;  12-4 


#  3.04 


TEMP 
33.6  h 


-21- 


PROG     276.5411  CAMP  ROBERTS 5  RNTtl 

TUE:      1^77  riRY   16  l';'76.47y) 

7.561  GHz?   60.0  Ft   DISH  G-'Ta  G.--T 

41.35  dB/K     43.30  dB-'K 


DEW  PT. 
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6,5     The  REWORK  Program 

The  purpose  of  the  program  REWORK  is  to  fit  the  data  sets  collected  with 
the  MEAS  program  and  curve  fit  it  to  a  two-dimensional  gaussian  curve  and  calcu- 
late six  primary  parameters  G/T,  G/T  ,  NEE,  ISPJF,  the  half  power  beam  width  of 
emission  Gas  A  convoluted  with  the  antenna  beam  pattern  along  a  path  of  constant 
declination  (HPBW//1),  the  half  power  beam  width  perpendicualr  to  constant  declin- 
ation (HPBW#2),  each  as  a  function  of  elevation.     Then  the  program  calculates 
least  squares  fit  for  each  of  the  six  primary  parameters  to  curves  of  the  form 
y  =  ax  +  b  where  x  is  either  the  elevation  angle  (linear  fit)  or  the  cosecant  of 
the  elevation  angle  (esc  fit).     For  the  parameters  G/T,  G/T  ,  NEE,  and  NUE  the 
measuremerit  errors  are  calculated.     The  measurement  errors  taken  into  account 
are  those  discussed  in  the  site  preparation  section,  and  by  Daywitt  [3]  in  a 
separate  publication.     The  deviations  of  the  data  points  from  the  fit  curves  are 
calculated  for  the  six  primary  parameters,  and  also  for  the  measured  Y-f actor. 
The  conditions  assumed  for  measurement,  and  for  the  error  estimate,  are  labeled 
and  printed  out.     The  results  of  many  of  the  subcalculations  used  in  the  error 
calculations  and  some  related  parameters  are  printed  out.     The  peripheral  cal- 
culations are  presented  to  help  the  raetrologist  using  the  REWORK  program  get  a 
better  feel  about  the  conditions  of  the  measurement  and  information  to  help 
decide  on  whether  to  retain  or  reject  a  measurement  set. 

6.5.1     General  Information 

Basically,  the  REIWORK  program  reworks  the  measurement  data  at  one  of  three 
rework  levels  and  prints  out  the  results.     A  full  first  level  rework  is  acti- 
vated by  using  an  integer  rework  number  entered  into  the  rework  data  statements 
located  at  the  end  of  the  REWORK  program  and  selecting  option  "0=REWORK"  at  "the 
restart  alternatives  position" (TRAP)  reached,  e.g.,  via  Key  0.     The  first  level 
rework  fits  the  data  to  a  two-dimensional  gaussian,  uses  the  fit  data  to  calcu- 
late G/T,  G/T  ,  NEE,  NUE,  HPBW#1,  HPBW#2,   etc.,   for  each  data  set  (typically  180 
a 

data  points),  and  then  least  squares  fits  the  results  to  a  linear  and  to  a 
cosecant  function  of  the  antenna  elevation  angle. 

A  partial  second  level  rework  is  activated  by  using  a  noninteger  rework 
number  in  the  rework  data  statements  and  selecting  option  "0=REWORK"  at  TRAP. 
The  second  level  rework  uses  the  last  stored  fit  data  information  and/or  new 
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site  or  error  data  (e.g.  site  elevation,  HPBW#1,  ambient  temperature,    .    .    . )  to 
recalculate  G/T,  G/T  ,   .    .    .,  and  refits  the  results  to  a  linear  and  to  a  cosecant 

3. 

function  of  the  antenna  elevation  angle. 

The  third  level  rework  option  is  activated  from  "2  =  AUTO"  in  conjunction 
with  "3  =  DEL"  option  at  TRAP  (e.g.  Key  0).     For  this  option  G/T,  G/T  ,  NEF,  and 
NUF  are  not  recalculated  for  the  individual  sets ,  but  the  least  squares  fits  of 
the  various  parameters  versus  elevation  are  refit  and  the  measurement  errors 
recalculated.     Primarily  this  rework  option  is  for  deleting  data  sets  and  recal- 
culating the  least  squares  fits. 

The  refit  programs  are  interactive,   and  typically  the  data  are  reworked 
four  times — first  level  rework  for  all  frequencies,   first  level  rework  for  a 
specific  frequency,  second  level  rework  for  a  specific  frequency,  and  finally 
deletion  of  bad  data  sets  plus  a  third  level  rework  for  a  specific  frequency. 

6.5.2     Entry  into  the  REWORK  Program 

The  REWORK  program  can  be  accessed  via  links  to  the  REWORK  program  (REWORK) 
available  from  "the  restart  alternatives  position"   (TRAP)   in  either  the  SITE 
PREP  or  the  MEAS  programs,  or  by  inserting  the  REWORK  tape  into  the  internal 
cassette  and   (1)  Load,  execute  (2)  Run,   execute,    (3)  appropriate  response  to 
computer-generated  instructions  until  REWORK  is  loaded.     When  REWORK  is  loaded 
the  program  stops  at  TRAP  with  the  display  "0  REWORK,  ILOAD ,   2AUT0,  3DEL,    .    .  . 
."     If  the  rework  data  statements  have  not  been  altered,   then  the  program  needs 
to  be  halted  by  pressing  the  END  Key  (a  lazy  T  appears  in  the  display)  and 
fetching  the  data  statements   (FETCH  6000,   EXC)  and  using  the  editing  keys  to 
enter  the  appropriate  changes.     We  recommend  that  the  REWORK  remark  statement 
and  REWORK  data  statements  be  listed   (LIST  6000,   EXC)  and  taped  to  the  cover  of 
the  notebook  which  is  used  to  collect  the  REWORK  results. 

6.5.3    Data  Tapes  and  Data  Statements  for  a  Level  One  Rework 

The  REWORK  program  is  designed  to  rework  the  data  contained  on  a  single 
summary  tape,  so  if  data  from  different  tapes  are  desired  in  the  rework,  the 
data  have  to  be  collected  onto  a  single  tape.     On  any  single  summary  tape,  files 
exist  to  store  results  for  two  different  reworks.     If  the  results  of  more  than 
two  reworks  are  needed  for  a  data  set,   a  duplicate  summary  tape  per  two  addi- 
tional results  is  needed.     The  full  rework  is  accomplished  by  providing  an 
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integer  rework  number  in  the  data  statements  at  the  end  of  the  computer  program 
and  selecting  the  "0REWORK"  at  TRAP. 

Rules  for  the  rework  data  statement  are  as  follows.     For  convenience,  the 
identification  of  entries  in  the  data  rework  statements  is  in  a  remark  statement 
immediately  preceding  the  rework  data.     The  rework  data  statement  has  eight 
entries.     First  is  the  rework  number .     For  a  complete  rework  this  number  is  an 
integer.     To  avoid  confusion,  we  recommend  this  number  be  unique  for  each  rework 
associated  with  a  particular  measurement  site.     The  computer  program  requires 
that  the  rework  number  in  successive  rework  data  statements  be  larger  than  each 
preceding  number.     This  allows  starting  at  a  particular  rework  statement  and 
stepping  over  previous  reworks. 

The  second  rework  entry  is  the  file  set  (1  or  2).     This  entry  determines 
the  locations  where  the  results  of  the  rework  are  stored  on  the  summary  tape. 

The  third  rework  entry  is  the  measurement  frequency   (expressed  in  giga- 
hertz) of  the  data  sets  included  in  the  rework.     The  frequency  recorded  with  a 
data  set  on  the  summary  tape  must  agree  exactly  with  this  rework  entry  or  else 
it  is  not  included  in  this  rework.     If  the  frequency  was  incorrectly  entered  at 
the  time  the  data  was  recorded,   it  has  to  be  corrected  to  be  included  with  a 
rework.     An  exception  to  this  rule  is  for  an  all-frequency  rework.     To  rework 
all  data  sets  regardless  of  frequency,  a  0  is  entered  for  the  frequency  entry. 

The  fourth  and  fifth  entries  in  the  data  rework  statement  are  the  zenith 
value  and  the  cosecant  coefficient  of  T/T     (ratio  of  system  temperatures  to 

3. 

noise  add  temperature).     This  is  information  obtained  from  the  sky  profile 
measurements . 

The  sixth  and  seventh  entries  in  the  data  rework  statement  are  the  zenith 
value  and  the  cosecant  coefficient  of  HFBW#1.     Unless  there  has  been  a  previous 
rework  of  the  data,   these  values  are  not  known  and  the  values  0.14  and  0  are 
entered . 

The  last  and  eighth  entry  in  a  data  rework  statement  is  the  value  of  the 

noise  add,  T  ,   in  kelvins.     The  magnitude  for  T    has  to  be  estimated  from  the 
— ■  —      a  °  a 

printouts  that  occur  using  the  MEAS  program.     The  T    used  is  the  value  that 

3. 

makes  the  graph  of  the  center  cut   (N3=0)  reach  100%. 

The  rework  process  is  an  interactive  process  so  that  reasonable  errors  in 
entering  the  values  in  the  rework  data  statement  do  not  effect  the  ultimate 
results.     Rather,  a  poor  estimate  may  require  an  additional  rework  step. 
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6.5.4    Deleting  Data  and  Refitting  Results 

One  of  the  most  critical  steps  in  reworking  the  data  is  in  selecting  the 
data  sets  to  be  deleted  from  the  final  results.     The  rule  of  thumb  is  "never 
remove  a  data  set  without  a  valid  reason."     This  rule  leaves  a  good  deal  of 
latitude,  and  nothing  identifies  a  skilled  metrologist  more  than  information  and 
care  used  to  document  the  reasons  for  rejecting  data.     The  design  of  the  rework 
steps  is  arranged  to  aid  in  recognizing  invalid  data.     We  recommend  that  on  the 
list  of  data  sets  deleted  from  the  final  results   (indicated  by  a  minus  sign  on 
the  data  list)  the  reason  for  each  deletion  be  included  with  the  final  results. 
This  practice  encourages  complete  annotation  of  measurement  anomalies  as  they 
occur  during  the  measurement  process  and  helps  an  outsider  judge  the  reliability 
of  measurement  process.     Following  are  some  of  the  reasons  we  have  used  for 
deleting  data.     (1)  The  major  reason  for  rejecting  a  data  set  is  that  one  or 
more  of  the  cuts  in  a  set  cannot  be  processed  by  the  computer.     To  refit  to  a 
gaussian  curve  the  computer  uses  a  logarithmic  method  that  requires  that  the 
peak  value  be  greater  than  the  sky  temperature.     In  cases  where  the  amplitude 
caused  by  the  star  is  within  the  natural  scatter  or  drift  in  temperatures  of  the 
data  for  the  sky  temperature,   the  program  hangs  up  trying  to  take  the  logarithm 
of  a  negative  number.     This  problem  usually  occurs  because  a  cut  is  not  taken 
sufficiently  close  to  the  center  of  the  star  to  give  maximum  clearly  greater 
than  the  normal  scatter.     To  avoid  this  potential  refit  problem,  attention  is 
required  to  keep  the  data  sets  centered  up  on  the  star  and/or  to  retake  data 
that  does  not  give  a  reasonable  star  signal  to  sky  noise.      (2)  Another  cause  for 
rejecting  data  sets  is  due  to  recognized  accidental  measurement  conditions  such 
as  missetting  the  antenna  pointing,   and  incorrectly  setting  the  down  converter 
frequency  or  operating  the  frequency   lock  circuit  out  of  range.     If  the  -orob- 
lem  is  discovered  in  time,   the  data  usually  can  be  retaken.     Otherwise,  a  comment 
is  recorded  on  the  data  sheets  and  a  comment  is  recorded  on  the  offending  measure- 
ment or  a  subsequent  measurement.     A  bad  antenna  set  is  sometimes  detected  from 
a  very  poor  fit  of  the  set  of  five  cuts  to  a  gaussian  curve,   as  noted  on  rework 
printouts.     A  difference  on  the  printout  of  greater  than  7%  between  the  measured 
amplitude  and  the  fit  value  generally  indicates  a  problem  in  the  antenna  pointing. 
(3)  Star  data  other  than  from  Cas  A  are  sometimes  collected.     Until  the  informa- 
tion and  software  in  the  ETMS  are  corrected  to  properly  take  advantage  of  these 
stars,   this  information  is  normally  rejected  from  the  results.     (4)  Star  data 
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taken  under  abnormal  or  unusual  measurement  conditions  are  either  omitted,  or  an 
explicit  comment  is  given  noting  that  data  under  abnormal  conditions  are  retained. 
Abnormal  conditions  refer  to  conditions  abnormal  to  the  error  analysis  assump- 
tions for  the  computer  program.     In  particular,  hail  cloud  conditions,  rain, 
snow  or  condensed  water  particles  in  the  air  are  conditions  with  which  the  error 
analysis  in  the  computer  program  is  not  designed  to  deal.     The  atmospheric 
conditions  between  the  star  and  the  antenna  are  assumed  to  be  uniform.  Measure- 
ments, particularly  at  low  angles  where  an  atmospheric  change  occurs  between  the 
star  and  the  antenna,  may  need  to  be  rejected.      (5)  A  final  reason  for  rejecting 
data  is  that  the  data  obviously  do  not  fit  with  the  reworked  data  collected.  To 
spot  an  abnormal  data  set,   several  techniques  are  available.     If  the  frequency 

is  incorrectly  recorded,   this  is  usually  most  obvious  on  the  G/T    or  Y-factor 

a 

plot  on  a  single  frequency  rework,  because  the  coupling  ratio  of  the  noise  add 
directional  coupler  is  usually  frequency  dependent.     Normally  the  NEF  or  NUF 
will  not  be  frequency  dependent,   so  an  abnormal  measurement  set  will  often  stand 
out  most  clearly  on  the  NEF  plot  on  an  all-frequency  rework.     It  is  unusual  for 
any  measurement  set  to  lie  outside  the  error  bars  indicated  on  an  all-frequency 
NEF  plot.     Any  point  that  lies  half  again  farther  out  than  the  error  bar  should 
be  deleted.     Any  point  that  is  near  the  error  bars  on  the  NEF  all-frequency  plot 
should  be  scrutinized  on  the  rework  sheets  as  to  how  well  the  measured  data 
agree  with  the  fit  values.     After  examining  the  NEF  all-frequency  plot,  all  of 
the  single  frequency  plots  should  be  examined.     The  HPBW//1,   and  HPBW#2,  and  Y- 
factor  plots  have  only  one-sigma  error  bars,   so  one  third  of  the  data  is  ex- 
pected to  lie  outside  these  error  bars. 

6.5.5    Typical  Rework  Procedure 

The  typical  rework  for  data  at  three  frequencies  would  go  as  follows: 
(1)  The  data  are  collected  onto  a  single  rework  tape.      (2)  The  REWORK  tape  is 
loaded,   lines  10  through  66  are  deleted  from  the  program,   the  data  statements 
are  entered  for  Rework  #1  on  file  set  1  for  an  all-frequencies  rework  and  Rework 
#2  on  file  set  2  for  the  lowest  single  frequency  rework.      (3)  Key  0,  select 
option  0  RW  to  initiate  the  first  level  reworks.     At  the  end  of  the  reworks,  the 
program  stops  at  "the  restart  alternatives  position"   (TRAP).     (4)  The  rework 
results  are  examined  and  the  data  sets  to  be  deleted  from  Rework  #1  are  deter- 
mined.    (5)  The  rework  results  are  reloaded  into  memory  by  selecting  "1  LOAD" 
option.      (6)  The  bad  data  sets  are  negated  using  the  "3  DEL"  option.     (7)  Re- 
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work  #1.01,  a  third  level  rework  is  initiated  using  the  "2  AUTO"  TRAP  option. 
(8)  The  Rework  #2  results  are  reloaded  into  memory  by  selecting  "1  LOAD"  TRAP 
option.     (9)  The  data  sets  to  be  deleted  for  the  single  frequency  Rework  #2  are 
negated  using  the  "3  DEL"  option.     (10)  Rework  #7.  .01   is  initiated  with  the  "2 
Auto"  TRj\P  option.     Steps   (5-10)  are  needed  only  to  obtain  a  reasonable  fit  for 

HPBW//1  and  a  valid  estimate  of  T     to  be  used  in  the  upcoming  second  level  reworks. 

a 

If  no  data  points  are  grossly  out  of  line,   steps   (5-10)  can  be  omitted.  (11) 
Now  second  level  reworks  are  needed  which  use  the  newly  calculated  HPBVJ#1  and  T 

a 

but  do  not  take  the  time  to  fit  the  cuts  again  to  gaussian  curves.     The  second 
level  rework  is  activated  by  the  rework  number  in  the  rework  data  statements  to 
be  noninteger,  so  1.1  replaces  1,  and  2.1  replaces  2  as  the  data  entries  for  the 
rework  number.     No  other  entry  in  the  rework  statements  need  be  changed  as  the 
entries  for  HPBW  //I  and  T    are  not  used   (but  must  be  entered  anyway)       (12)  The 
second  level  rework  is  initiated  via  Key  0,   "0  PW"  TRAP  option.    (13)  After  the 
second  level  reworks  are  complete,   the  bad  data  are  again  removed  and  the  third 
level  Rework  //1. 11  and  Rework  #2.11  are  performed.     (14)  The  summary  tape  is 
duplicated   (keyboard  command,  DUP  5).     (15)  Rework  data  statements  are  entered, 
etc.,   for  Reworks  #3  and  #4  for  the  remaining  two  measurement  frequencies.  (16) 
.    .   .(26)  Repeat  steps   (3)   through  (13)  for  Rework  #3  and  Rework  #4.     When  all 
the  reworks  are  finished,  the  measurement  conditions  should  be  double  checked. 
To  do  this  the  "SITE  PREP"  tape  is  loaded,  and  the  measurement  conditions  are 
entered  which  correspond  with  those  recorded  on  the  G/T(dB)  error  table  printed 
in  the  final  rework.     If  all  of  the  measurement  conditions  are  correct,  the 
reworks  are  finished. 

6.5.6     Interpretation  of  Result s 

The  results  of  a  measurement  are  printed  out  as  a  series  of  computer 
printouts  as  the  last  step  of  a  rework  (any  level) .     The  normal  sequenre  of 
computer  printouts  is  as  follows:     (1)  Table  of  measurement  sets  incorporated 
into  the  rework;    (2)   table  of  the  results  of  the  least  squares  fits  of  G/T, 
G/Ta,  HPBW#1,  HPBW#2,  Y-f actor,  NEF,  and  NUF  versus  the  cosecant  of  the  eleva- 
tion, and  versus  elevation  angle  directly;    (3)  graph  of  NEF  versus  antenna 
elevation;    (4)  graph  of  NUF  versus  elevation;    (5)  graph  of  G/T  versus  elevation; 
(6)  graph  of  G/Ta  versus  elevation;    (7)  graph  of  HPBW#1  versus  elevation;  (8) 
graph  of  HPBW#2  versus  elevation;    (9)  Y-factor  versus  elevation;    (10)   table  of 
NEF  measurement  errors,  and  measurement  conditions  at  various  elevations;  (11) 
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similar  NUF  error  table;    (12)  G/T  error  table;  and   (13)  G/Ta  error  table.  Much 
of  what  appears  on  the  printouts  is  self-explanatory,  but  the  following  remarks 
are  included  to  better  understand  some  of  the  printouts.     Sample  printouts  are 
in  the  annotated  computer  printouts  section  (section  6.5.8). 

Printout   (2)   is  a  table  of  results  of  a  least  squares  fit  of  the  various 
parameters  versus  elevation.     Each  parameter  is  fit  to  two  different  curves, 
viz.  the  parameter  versus  the  cosecant  of  the  elevation  angle,  and  the  parameter 
versus  the  elevation  angle.     The  uncertainties  listed  are  the  one-sigma  devia- 
tion of  the  measured  points  to  the  fit  parameters. 

Printouts  (3)-(9)  are  a  series  of  plots  of  various  parameters  versus  an- 
tenna elevation.     The  measured  points  are  plotted  as  a  pound  sign,  and  the 
measured  value  and  the  measurement  label  are  listed  on  the  right.     The  fit 
points  are  indicated  with  a  period.     At  five-degree  elevation  intervals,  error 
bars  are  plotted  about  the  fit  values,  and  the  uncertainty  is  listed  on  the 
extreme  right  in  lieu  of  the  measurement  lable.     The  uncertainties  listed  with 

NEF,  NUF,  G/T,  and  T/T     include  the  errors  labeled  and  listed  in  the  error  table 

■  a 

printed  in  SITE  PREP.     For  the  plots  of  the  measured  half  power  beam  width 
(HPBW)  of  the  antenna-star  convolution  measurements  and  for  the  Y-f actor,  the 
error  bars  indicate  the  one-sigma  deviation  of  the  measured  values  from  the  fit 
value.     HPBW//1  refers  to  the  HPBW  of  the  antenna  pattern  of  a  center  cut  along  a 
line  of  constant  declination,   and  HPBW//2  refers  to  the  HPBW  perpendicular  to  the 
line  of  constant  declination. 

For  printouts   (10)-(13)   the  results  for  NEF,  NUF,  G/T,  and  G/T    are  listed 
in  an  alternate  way  that  shows  the  error  contribution  details  at  various  eleva- 
tions.    The  parameters  for  the  error  calculation  are  printed.     Most  of  the 
parameters  can  be  identified  with  the  corresponding  parameter  listed  with  more 
explanation  with  the  SITE  PREP  error  table.     Other  parameters  are  labeled  with 
the  computer  variable  table.     The  meaning  of  the  computer  variables  are  given  in 
section  7.     The  entry  labeled  G-diff  denotes  the  difference  in  (1)  calculating 
the  antenna  gain  using  the  antenna  HPBW  (see  section  2.6)  at  zenith  and  using 
the  measured  G/T     curve  to  obtain  G  at  a  particular  elevation,  and   (2)  calcu- 

3. 

lating  antenna  gain  directly  from  HPBW  at  the  given  elevation.     For  futher 
explanation  of  the  various  items  in  these  tables,  consult  the  annotated  print- 
outs. 
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6.5.7    Measurement  Pitfalls 

As  with  any  computer  printout,   the  results  flow  so  easily  and  the  valid 
results  flow  out  with  no  more  effort  than  the  unvalid  results.     It  becomes  such 
a  bother  to  worry  about  which  is  which,   that  sometimes  the  effort  is  not  taken, 
and  the  quality  of  the  measurements  slowly  ebbs  away.     In  the  opposite  direc- 
tion, as  certain  operators  gain  more  experience,   they  gain  a  sense  of  the 
quality  and  conditions  of  the  results  that  transends  what  can  be  programmed,  or 
in  some  cases — even  what  can  be  easily  communicated  to  others.     My  experience  is 
that  neither  the  computer  results  nor  measurement  intuition  should  be  given  the 
upper  hand — but  equal  weight  given  to  each.     Documenting  measurement  conditions 
and  explicitly  stating  measurement  concerns  will  ultimately  give  rise  to  an 
improved  measurement  procedure.     Certain  measurement  pitfalls  occur  regularly  so 
they  will  be  discussed  explicitly. 

6.5.7.1     Extending  Results  Beyond  Measurement  Range 

One  should  be  particularly  careful  of  extending  the  measurement  results  to 
antenna  elevation  angles  beyond  the  elevation  angles  of  any  measured  data  sets. 
The  computer  printout  tables  print  out  the  results  at  10  degrees;  but  if  no  data 
sets  were  taken  lower  than  15  degrees  elevation,   the  validity  of  the  error 
uncertainty  should  be  seriously  examined.     Measurement  experience  and  reasonable 
measurement  implications  of  the  extended  results  need  to  be  intelligently  con- 
sidered. 

6.5.7.2    Abnormal  Atmospheric  Conditions 

The  model  used  in  the  computer  is  that  the  atmosphere  has  a  typical  profile 
of  temperature  and  humidity.     Primarily,   this  excludes  condensed  water,   or  a 
dramatic  change  in  temperature/humidity  as  encountered  when  a  weather  front 
moves  near  the  measurement  site.     Problems  with  the  model  atmosphere  are  easiest 
to  spot  on  an  all-frequency  NEF  plot.     The  NEF  of  an  earth  terminal  should  be 
independent  of  frequency  and  antenna  elevation  within  about  5%  due  to  small 
changes  in  antenna  gain  with  elevation,   small  changes  of  the  system  temperature 
due  to  increased  thermal  radiation  into  the  antenna  side  lobes  at  low  elevation 
angles,  or  small  changes  of  system  temperature  with  frequency.     t\fhen  abnormal 
atmospheric  conditions  exist,   the  error  estimate  listed  on  the  computer  printout 
may  be  too  small,  especially  at  low  antenna  elevation  angles. 
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/  6.5.7.3     Data  Deletion 

By  the  process  of  deleting  the  data  sets  farthest  from  the  fit  value,  one 
could  obtain  a  data  set  with  relatively  small  deviation.     Despite  the  appearance, 
the  accuracy  of  this  truncated  data  set  is  actually  poorer   (unless  the  data  sets 
deleted  were  truly  abnormal)  because  the  measurement  set  is  smaller.     Because  of 
the  nature  of  random  errors,   the  various  measurement  sets  will  naturally  have 
somewhat  greater  or  smaller  variances,  especially  when  the  numbers  of  measure- 
ment data  are  small.     The  true  uncertainty  of  the  ideal  measurement  should  not 
be  variable. 

6.5.8     REWORK  Annotated  Printout 
The  annotated  printout  for  the  rework  program  follows. 
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REWORK 


LORB 

PRINT  .^L  OH  a=YES>?l 
I  REwUkKISITE  DRTflf  10=IriTj5=E:n 
'  KKun  LUHST  CHANGE  riPTI0Na:i-=^H8>?y -* 
16.  3 

NBSll=l.04     LOADER     <D1-Fe>  T2-F0: 


/AJre,HAj^l      CA3JMTTS      U  li  I  r 


Y. .  m< 0002  >T2-4  >  li  1  -4 


PROG     276=5411  HflRROGfiTE  EHG 

SflTS    1.977  HfiY  28     C  1977.409.) 
7.550  GHz!   60.0  Ft  DISH 


RUN 


G^To.  '^■•"T 
33.02  dB-'-K     46.  16  dB^K 


(33!i|cl|3?§|?|d!l@l?|B||@iaiB§yfa(B!39iSi?§id 

FROG  COHSTS 


fl2:  2.3 

B2:  0.65 

B6:  7.59224E-03 


■B35  0.9S 
B9:  170.827 


85;  0.150451 
B  :  S.2943 


Cl:  4.54421E^^ 

C5:  54 

C8:  0.1 

C  :  1977.4 

Di: -0. 1 

D5:  0.01615 

D0:  0.0157887 

F6:  5 


G4:  3.61841E-03 
G  :  1361510 

Hi:  0.151166 


C2^  1 

CSi  245.421 
C9;  0.2 


D2;  1.34754 

D8:  0.75 

D  5  60 

F0:  0.01 

G5.  l.S9405E-^4 

H5:  1 


C4:  1.683 
C7:  0.23 
C0:  0.5 


B3:  0.6 
D9:  0.18 


F  :  7.55 


G6:  3.35159E-04 


H9:  679.844 


L5!  2.00457 
LS:  1.02064 


L6:  2.17 
L9:  0.013 


L7:  1.08241 
L  :  5 


M  :  10366 

Hi:  6 
H  :  1 

03:  3.22653 
08: -0. 0485 

T  :  131.343 

W  :  5.5 

21:  0.0377515 

fd  Id  I?  <i  Id  fd  1?  id  id  Id  e  Id  la  Id  id  Id  @  Id  IB  id  ;i 


H6:  3 


N7:  530 
07: -0. 0439 


79 


6010  DFlTFl  2?  2' 


4?  0  ,  1  20H'i  0.  n0b6:"  0.  .14  !       1  Ibb 


L I S  T  6  0  0  0 


6000  REM  l--RUr?KttjJ^=^do.! 
6010  DflTH  2)2<f.  34>0.  I 

~r  ^ 


^      V/A     SKI'  PO^OfiLS 

^    T\ejui,r    OA/   pRitJT  OUT 

\ 


\/ALue     uieo     TO  o^TA/Ai 


p  i/ztT  oar 


-X    TO     PftSJENT  \ME.HOHy      SMOHrAae^     A-^-f-yult     kjLyhw^Aj  *>f^ 

I>eL  /o,  66  \ 


0  R  W ,  1 L  0  H  IN  2  H  U  T  i:i  j  3  =^  D  E  L .  4^  i  ]  -■  ■ ,  '5  P  L  T  - '  1 1  ■ !  R  <   -  hi  C  > :   0  « 
SUM  ThPE  tt<  =NC):   0   v  Vl 

QPHpH  HhTH':  0  =  NU)  (   ^M-IC):    0         v  1  •*«—  tf /JA/W    OPT/t>f)     uses    A   kor  e>e 

:-. T fl R T  1^  RE W 0 R H:  #  (  =  N i;  > :   i3        '?  1 

\ 

^  /M    TUP  HeuioUK 

IHIii'lHY  -r-^  I  :i,..,.:b6   HHkkULHi  h'-- tHl.  MjN/ -c,  i  U 

-:b('3  H  DI463C.  81<  8694?  ;::701  >  iMiTH  CULLECT  TS-^iJJ  j  L  1 -h  1 4FkLi..!  ^-'^^  st^y  r/io^,^e 


ILE 


ILE 


^  -|-  U|  I  !  |v|  H  ■ , .      ;|  c,  7  ^    ^  6    U n P  \<  U  G H T  E  '    E  M G;  '^^^^^ 

>l S  H  n U 6 :3 C  .  S i 3 6 9 4- 8 7 0 1  >  I) Fl T H  C iJ L L E C T  T 3 - F 0 '  D 1  - F 1 4 F h: E I! 
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REWORK  (cont) 


PEIIOPK 


TRPE  1 

,  ,    ,   '^rr'  i-^'J '"'^  I      .   I     -o-  T  -^    I  in -J  Afa)o«K 


THU"  i 


i::;.i:J         r  • 


1  y  7  7 .  4  Q  y  :j 

ISH 


susjuou  T/zve     USED   S)  am/vC 


TEMP 
46.2  F 


DEN  PI, 


REL 


NFlTEP  DEHS 
7,4  ■?iM/i.vt3 


jLGUn  COVER 
4 


NiHD 
y  I'ir-'h 


MEflS 

h  ■-.  P  C 


flzinuTi- 

352=  4^ 


HPBUI 

f  1 ,  1  4  '^i  f  i 


HT-  ruy2:^^- 


JU*    Jta    CAS  A 


TiNEa-iRs; 


nppscy  ELEV  CUT     RUN     SET  N 

+    Ci  .  fi  i.^   h  9  *  C  S  f:   L.  '-'  U  i'  H 


Kl  K2  K3  Kb  Kb  13  K  PpR-etf  R"?!^ 
0.991  @ .  90 1   1  .  000   1 .  000  0  ■■  333   1  =  000  0  .  83 1     0 .  6500       0 .  93 


■:■  <:.  F  U  > 
■i  9  5  .  Ci 


i22E-0^ 


ZERO  LEVEL 
0. 1274*TH 


100"-.  LEVEL 
0.  1553*TH 


H3 
1 


10 
1 1 
12 
13 
14 
15 
16 
17 
13 
19 
20 
21 


24 


24 

0 


■10 


I 


K-FRCTOR 
0.SS1 


TOCflS: 
32.45 


S(Jn>  Tfl 
595.0  1166.0 


10 


scA  ue 

i»  o/c ) 


pwR/puR<Hriri; 
e .  1 2 

0.  12 


0.  i; 
0.  i; 
0.1; 
0.1; 
0.1; 
0.  i; 


b  o  d 
6  9  9 
610 
,-'08 


0.12 
0.  12 
0.12 
0.  12 
0.12 
0.  12 
0.12 
0.12 
0.  12 

0 . 1  ;3 
y.  1 

0.  1 
0.  1 

0.  i: 

0 
0 


2751 

'41 
'46 


'40 
'17 


b  y  9 
796 


274- 


12 
12 
0.  12 
0.  12 


371 

r'  8  0 

343 


0.  1 

0.  1 

0.  1 

0.  1 


2303 

•-I  -y  cr  --I 

;:oi 

'51 


T  Tm 
0. 127^ 


0.  15  ■•. 


LErin 


ttFT': 

30 


143. 
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REWORK  Ccont) 


TAPE  1 

DW63C.  3KS694' 8701  >  DhTh  COLLECT  T3-FCi <  1 1  -  F 1 4 


do  in.  2        HB31II.4J     RElJOPk     xHl-Flb;  T4-F12 
DFN^  JPWj  HOOPhV i 


REWORK  2.00 
. 5£<S699>T2-4.Dl-4 


FROG  ZbS  HhRROGhTEj  EHG 

THU:      I'-i.T  Mh  I    J'.;.         1977. 486> 
7.34y  GHz'   60.0  Ft  DISH 


RUH  1 


TEMP 
46.3  F 


DEW  pT 
43.3  F 


C  F I  _    f-i  i 

39.  4 


WHTER  DEH:- 
7.4  •9n/nt: 


:L0UD  COVER  WIND 
4  0  riph 


HERS  nZIHUTH 
6sei-  314.40 

dT=  0.02S 

PASS  #FIT  DET(C> 

1  :3  0        0  ,  0  3 1 

2  13  31.262 
ZERO  LEVEL 
0. 1262*Tfl 


HPBN        TINE':.  MRS)         OFFSET  ELEV  CUT     RUH     SET  N 

0.1400  7.874       -0.163  dt?        33.17  -2123 


Tfl  =  0.1208  +  0.00660*CSC  L 

*HPEW 
0  ,  1  3  0  d  -9 


100^;  LEVEL 
0. 1541*Tfl 


T.  Tn.            DT(CFlS  R>-  Tfl  PEAK* 

0.1262      0.0059  +-     3.01";  13.55 

0.0061  13.38 

V'-DE)            K -FACTOR        T<CAS>  S'-Jn> 

0 . 865 1            Q . S8 1            32 . 45  595 .  U 


CflS  H 

SLOPE  T-FIT 
-1.23'i  -4.4"i 

Tfl 
1 166. 0 


N3 

1 

4 
5 

6 

(' 
8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

13  ■ 

19 

29 
21 

22 

23 

24 

25 

26 

C  1  ' 

■TiQ 

29 

3^1 

I . 


40 


80 


i0t1 


p«r'  PIC  no  n 


Oe    /vr  TK* 


run 

at  M< 


0. 


FAS:; 


#FIT  DE 
30  0 


T  ( C  ) 
.  031 


-:HPBW 
0 .  1  jude- 


0. 1364 


.!....!,...' 

DT(CH8  fl>.  Tfl 
0.00j9  +-  6.85*; 


PWR/PWR(ADD::' 
0. 12752 
0. 12698 


12719 
12771 
12764 
12693 
12763 
12667 
0. 12699 
0.  12737 
0. 12750 
0. 12855 


0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 

0.  1 


D I 
2994 
3083 
3058 
3254 
3209 
3233 
3205 
3211 
3020 
2952 
2884 
2803 


.0.  12701 

0:li64?  c^^f^'^-v-* 

0. 12643 
0 . 1 2676 


♦  1 

PEAK#  SLOPE' 

18.88  -1.34"; 


T-FIT 
0.4?; 
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REWORK  Ccont) 


ThFE  1         data  2        NBS1D,42     REWORK     ;L1-F16>  T4-F12  REWORK  2.90 

DFWjJPlJjHOORHf  ! 

DI.J63C .  8 1< 8694 5  878 1  >  DflTfl  COLLECT   T  j-FQ.  Iil-F14>       ; • .  52 < S699>T2-4  •  H 1 -4 

-4- 

RUN  1 

PROG     276  =  266  HflRROGfiTE.  EHG 

THU:     1977  MflY  26         1977. 400. J 
7.340  GHz?   60. e  Ft  DISH 


TEMP 
46.2 


DEW  PT. 
43.2  F 


REL  Hum 
S9.4 


WATER  DENS 
7.4  •=in.-^fMt3 


CLOUn  COVER 
4 


WIND 
0  i'lPh 


MEflS 


6£ec  31 
dT=  0.023 


flZIMUTH 
37 


HFBW 


TIMECHRfiJ 


OFFSET 


ELEV 


CUT     RUN  SET 


*hPBW 


PRSS  #Fir  IiET(C) 

1  30  0.029 

2  13      31.262  0=132dP5 
ZERO  LEVEL         leo^i  LEVEL  Y'.J!B> 


0.1480  7. 933      -0.129  dt3        82.74  -1 

pT-'TR  =  0=1 196  +  0. 00668-^CSC  L  ~] 

T.  Ta  I  LTCCHS  riJ/Tfi  PEhK# 


1 


CHS  R 


0. 1262 


0. 1262+TR 


0. i540*Tfl 


0.865' 


0.0141  +-  4.2S-; 
0.8146  +-$$$$$$•■; 
K-FflCTOR  T(CflS> 
0.S31  32.45 


SLOPE  T-FIT 
17.59     -0.71'-;  -0.2^; 
18.09 
S<.Jn>  TR 
595=0  1166.0 


0  20 

40  601 

80 

100  (:■;> 

N3 

1         1         1         1  , 

1 

1 

1 

* 

1  1 

0. 12715 

2 

* 

!  , 

0. 12724 

3 

* 

;  1 

0. 12759 

4 

* 

!  , 

0. 12694 

5 

* 

!  1 

0. 12750 

6 

* 

i  1 

0. 12737 

7 

* 

!  ' 

0.  12712 

8 

* 

1  1 

0. 12778 

9 

* 

!  1 

0. 12842 

10 

* 

0. 12896 

11 

12 

* 

* 

0. 13040 
0. 13226 

13 

^       tut  -JOULO 

0. 133S6 

14 

0. 13613 

15 

0. 13846 

16 

0= 13916 

17 

0. 14011 

18 

I  *  ' 

0. 14089 

19 

* !  1 

0. 13941 

20 

*   -  1 

0. 13884 

21 

*  ! 

0. 13823 

22 

*              !  1 

0. 13557 

23 

* 

!  , 

0. 13295 

24 

* 

!  ' 

0. 13179 

25 

* 

\  1 

0. 12997 

26 

* 

0.  12369  P/^^Pff/^eA/Cf 

27 

28 

* 

29 

* 

!  1 

0. 12689  i  fo.p.i>icreo 

30 

* 

I 

1          1          1          1  ' 

1 

J 

0. 12564        sxr  r^np 

PRSS  #FIT 
3  30 


IiET':Cj 
0.  029 


13J'.:j^ 


riT<  CR3  h>---th 

0144  +-  2.70!^ 


pehk# 

18.09 


SLOPE  I T-FIT  , 


- 1 . 39'; 
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REWORK  (cont) 


ThPE  1         dato.  2         NBSiri.4,;j     REHuRK     <Til-F16>  T4-F12  REWORK 
DFl^  JPN?  HUURfii'  I 


D  N  6  ;3  C ,  3 1  <  S  S  9  4  ?  B  7  Q 1  )■  ri  h  J  f\  C  0 1....  I,  C  T  T  F  6  ^  D 1  -  F 1  4  ?       '<  .  5  2  <  B  €  9  9  >  T  2  -  4 »  D 1  -  4- 


RUN  1 


PROG  27 
THil:  19 
7.340  GH;: 


;:66  HRRROGflTE'  EHl 

NmY  26  1977.400;' 
60. 0  Ft  DISH 


TEMP 
46.2  F 


DEW  PT 
43,2  F 


■iliND 


WATER  DEN 

7 .  4  3Pi.-'nt 


CLOUD  COVER  WIND 
4  0   f  iF:4-| 


MEflS 


dT=  O.Si 


R2IMUTH 
310. 37 


HPBW 
0.  1400 


ELEv 


TINE':  MRS 


OFFSET 

■-  0  ,  0      0      :  j 


CUT     RUN  SET 
0         1  2 


T/Tfi 


PASS  #FIT  DET'j: 
1         3  0         0 ,  0  2' 


i-HPB 


0.1195  +  0.0OS60*CSC  L 

T/To.  DTCCaS  R;'/Tfl 

0.1254       0.0£5£  +-  2.93°L 
0.0254  *-$$$$$$•: 


ZERO  LEVEL 
0.  1254  +  TR 


100;;  LEVEi. 
0.  1532+Th 


K-FRCTOR 


T'::CflS; 
32.  45 


PERK# 
IS.  06 

S ';  Jn) 
595 .  0 


CHS 

SLOPE  T 
-0.07'; 

TR 
1 166. 0 


N 

10 

-FIT 


N3 
1 


9 
10 
11 
12 
13 
14 
15 
1-6 
17 
13 
19 
20 
21 


£4 

26 


4ti 


100  ( ) 
. . !  PWR/PWR(RDD) 
0, 12737 
0, 12601 
0 . 12  6  5  6 
0. 12693 
0. 12675 
0 . 1 2693 
0. 12787 
0. 1301 1 
0, 13223 
0,  13465 
0.  13325 
0. 14198 
0. 14563 
0.  14720 
0.  15019 
0,15134 
0. 14971 
0. 14334 
0. 14689 
0. 14324 
0, 13997 
0. 13740 
0. 13436 
0 . 1 3076 
0. 12922 
0.  12329 
0. 12639 
0. 12585 
0. 12531 
0.12544 


PflSS  #FIT  DET':: 
-;        3  0        0 . 1-1 


-i-IPBW 
0,  133d--'3 


ET'.  COS  R)--Th 
0 .  0  2  5  1   -f-  -     .3 .  2  < 


FEfiKti-     Slope  t-fi 

15.93       0.18".  0.5 
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REWORK  (cont) 


TRPE  1         data  2        NBSID.^2     FtWuRK       Dl-FlS     T4-F12  REWORK  2.W 

riFh5.JPW,HGripHV! 

DW63C.81<8694jS701>  DflTfl  COLLECT  n- fO^Cl-FH.  k.52<S699>T2-4»Ll-4 


PROG     27C.i:6C  hRRROCfiTEj  ENG 

THU:     1977  HFh'  2F     c    1977. 4883 
7.340  GHz?   60.0  Ft  DISH 


TEMP 
46.  2  F 


DEW  FT. 
43. 2  F  - 


?el  humd 


WRIER  DEHS 
7.4  -^riyi^ifj 


CLOUD  COVER  WIND 

4  3  I'ipr 


flERS 


fiZIMUTH 
38S. 33 


HPBW 
0. 1480 


TInExHRS) 
S.07S 


OFFSET 
-0.051  des 


ELEV 
31.77 


CUT 

1 


RUN 

1 


SET 

2 


H 
11 


H3 

1 

1 

* 

2 

* 

3 

* 

4 

* 

5 

6 

•? 
1 

3 

9 

10 

11 

12 

13 

14 

15 

16 

17 

IS 

19 

28 

21 

22 

23 

24 

25 

26 

- 

27 

* 

23 

29 

30 

PRSS  #FIT 
3  30 


DC  r  I 

0.  o; 


^  —  ^      FErsK*       SLOPE  T 


1.2^ 
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REWORK  (cont) 


TAPE  1         data  2        HBSiri.42     REUORK     aU-Flb^  T4-F12 
DFW-JFlJ>HOOf,h',  i 

DW63C.Sl<3694<S7til  >  DhTH  CuLLECt  T3 -FO -  H  1 -F  1 4 . 


REWORK  2. 
52<  8699  >T2-4  5  111-4 


PROG     276.266  HflRROGflTE?  EHG 

THU:      19;' 7  PlHY  2'-     ■    1977.  406 
7. 340  GH::5   bW.O  Ft  DISH 


RUN 


TEMP 
46.2  F 


DEW  PT. 
43.2  F 


REL  HUHD 


WHTER  DENS 
7,4   =11 -I.  ■fit  3 


CLOUD  COVER 
4 


WIND 

0    fl  F-"'  h 


HERS 
bit  c 


RZINUTH 
307. 56 


dT=  0,02f 


PRSS  #FIT  DET(C> 

1  30  0.027 

2  13  31.262 
ZERO  LEVEL  100 
0.1247*TR  0.1 


|j:ni4yoJ  3. 

I  I  .■  I  rt  ^  y 
I 

*HPBW 

\    -  0 

.  LEVEL  '.''DE;' 

^26*TR  0.374 


N3 
1 
2 
3 
4 
5 
6 
7 
8 

16 
11 

12 
13 
14 

15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 


PRSS 


1 


0 

I  ....  I 


40 
I  . 


HR3> 

OFFSET 

ELEV 

CUT 

RUU 

SET  N 

144 

-0.012  d€? 

31 .  30 

I 

2  12 

.1131 

+  0.00660*0 

S  C: 

L 

IRS  H 

T--To 

DT'.CRS 

R ) 

■•  Tfl 

PERK# 

. SLOPE 

T-  FIT 

,  1247 

0 .0192  + - 

16 

.  16 

-0.  55"; 

-  0  .  0  '■; 

0.01 9  6  + - 

t$ 

15 

.  64 

K-FflC'OR 

T 

^CflS.:' 

TH 

0.  331 

2.45 

95.  0 

1 166 

.  0 

60 
i 

30 
1  1 

1 

in 

1 

0    ( ' ; ) 

PWR/PWR 

(RDD) 

12542 

12601 

12532 

12531 

12563 

12576 

12712 

12365 

13062 

13266 

13525 

13374 

14006 

14296 

14365 

14450 

14335 

14221 

13980 

13680 

13443 

131S9 

12980 

12830, 

12"^92 

12717 

12571 

12546 

12519 

12580 


#FIT 

30 


DET'rO 
0.  027 


I  ■  I 


DTOJRS  r:'  --  tr 

t         irt  '  H  |-|  Q  |13  1^  |-j  |3  Ijl  I  : 


PERK#  SLOPE 
15.64  0.67'; 

! a  I c  !d  la  I J  \ii  ;  ij  I "1  Id  |«l  Id  i  b  |ci|0|b|i| ~i  I 


r  •  - 1 T 
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REWORK  (cont) 


Id  |d  Id  Id  Id  Id  |d  id  Id  10  1  =  |o  15 1  □  la  id  15 10 1  □  ip  |c    ,a  |u ,  u ,  u  .0  iu  ,u  ,^  ,^  ,^ , , , . , 


TRPE  1         data  2        hjBSlC,42     PENORK     <ril-Fl'5>  T4-F1? 
DFW?  JFH- HOORhV  i 

DW6:5C.Sl<Si;94j37ei>  DflTFl  COLLECT  T  3-Fa ,  P 1 -F 1 4 .  a.5Z< 


REWORK  2.m 


5699>T2-4r  Dl -4 


PROG     276.266  HfiRROGfilEs  ENG 

THIJ:     1977  riflV  26         1977. 409> 
7.340  QHz-,   60.0  Ft  DISH 


RUH  1 


TENP 
46.2  F 


DEW  PT, 
43.2  F 


REL  HUME 
89.4  ^: 


WfiTER  DENS 
7.4  giM-^fvTS 


CLuUB  COVER 
4 


WIND 
0  OiPh 


|B  id  §  id  §  id  Id  15  Id  Id  Id  Id  Id  Id  Id  Id  Id  id  @  Id  Id  jd  id  i  □  Id  ih  fa  id  Id  Id  5  Id  Id  id  ,ll  id  fi  ,d  @  id  Id  id  id  id  id  Id  id  Id  Q 13  id  Id  id  id  id  id  id  fd  fd  id  Id  id  §  Id  i5  fd  id  Id  Id  id  id  id  id  id  id  id  i= ,  d  id  id 

BEST  FIT  FOR  5  CUTS     s^ev  of   o  <^or 


REWORK  FILE  TAPE  TIME(Hr; 
2.0        9         1  8.014 


EPF  fiREfl  TaCK)  SKY  BRIGHT 
170.8  iMt2  1166.0        2.31  K 


ELbVvde  ^) 


RUH 
1 


5ET 


PASS  #FIT     DETCC)  *HPBN  T/Ta 

1  5       15.236        0.142dt3  0.125? 

2  5        7.203        0.142de5  0=125? 


DTCCfiS  R>/Ta 
0.0274  +-  1.91° 
0.0276  -i--  0.91° 


DECL  OFFSET:    CRS  H 
-0  =  063d6-? 
-0. 063de3 


*HPEW#1 
0.  139de? 


Y-FflCTOR  T<K) 
1.2195  146.33 


DT(ChS  H>       G<dB>       G-TCdB)         KEF  HUF 
32.13  K        61. S5        39.40      2.346kFU  2.336kFLi 


|?(riid|d|d|]l|^|]liBld|d|d|dididi]l|d(d|5@|?@ 

100*'::DHTH-FIT)/aifl;K  IiT(CflS  R>/Tfl) 


CUT 


-1 


0 

0.  79" 


1 

-0.02^ 


0  •  y  4  '=■ 


-tHPBW 

#1 

=  3. 14000  + 

C, 000000  CSC 

L  =  &. 1400  ( 

ant 

=  0.13 

9  y  .'■ 

Kl 

K2 

K3  K6 

KS  K9 

K  fiPR-eff 

R-ef  f 

S<FU> 

Xi 

'::k> 

0.991  0. 

501 

1 . 000    1 . 000 

0.'-SS  1.000  y 

.381  6.6500 

0.  98 

5mS,  fi 

2.52 

2E- 

05 

SITE  ELEV 

oxy  attn 

i.in.i, er  attn 

zenith  attn 

REFR  #1 

REFR 

#2 

ant 

-DIflrl 

0.500  ki=i 

0 

.03209  dB  0 

.0060  dE'd^n; 

0.O3S1  dB 

1.062 

6.01 

30 

60 

.  0  ft 

£  rc. 
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REWORK  (cont) 


2 


Q  PW  J  1  LORD 2flUTiJ  ?  3  =  IiEL.  ?  4G  -■T  5PLT/EF:R  ■  ') '  6 


FETCH6Q0M  

btifiy  PEH{_1  ttj. 


drit  0.  SET  :i  J-F  J  4--T  ■'■THi?4y ,  5s:,- ,  *|£;  =  HPB!.Ti]ii98  ?  *7  =  c 


6 Q 1  y  D H T  H  1  £  .  2  ?  2 11  7 .  :3  S 5  ?  f i ,  1 ,;: i -i P;  ?  8  „  Q Q 6 6  ?  6 .  1  4  ?  9  ?  1166 
LlSTSyuu 


6060  REM  1=RWPK# 
6010  DRTfl  12.23  2 


5  E  ■  „  :  9  -:r  f ::■  ,       ^  f  /'  J  Pi  0    0  ,  S  "  C  :E.  r. ,  *  6  =  H  P  B  Pi  0  9  6  J  * 

1  ,;J  1: 1 ;  ■ '  ■>  ti .  !■ Pi  t;.  6  jO.  14?0)  1166 


(p!  pp)  J  L  U  Fl  D  ?  2  h  U  ■■[■  0  J   ^  D  iP  i...  ^  'T  G .  ■■  "I"  'i  " :  f-'  L  T  ■ '  E:  iP  P:     =  N  G :  O 
SUM   fPiPE         =:4!G>=    10       ^  \ 
G  R  f  1 P  PI  D  H  T  Pi  ( 0  =  H  0 )       H  P    :    O  0  \ 

\ 


START  !?  RENORKttC   ^=:NC):  12.21 


FILE 


■  lU  FOR  M/vT/^A/       ON      BhCH       SUMMAKY   Tfi^pE    FilF      is   Lisre  P 

T  U  E I  ■I  H  ■  i  i  0 1 ? c.  7  6  . 1  -  I- 1  i    Pi  i ^  i  P'  R  0  o  E  P:  T'  P.  ?    Pi  \  \  T  if  1 


:Ta 


■erfs  fl 


DPlb 


i  6  9  4  >  3  7  0  1  :>  D  fi  T  Pi  C  O  L  L  E  C  i   T  3  -  F  0  n  D 1  -  F-  1  4  F  R  £  i^!  O 


FILE  10 


T  U  E  M  ATI  0 1  y  7  7  2.  ?  fa .  5  4  1  i.  iJ  fl  II F^  R  0  B  E  R  T  S  i   fl  li  T  #  1 


RUH/SET  1 . O; 


TTT:.  H 


D  W  6  3  C  .  7  fa  <  8  fa  9  4  ■>  2  ,■ '  Pi  1  >  Ii  Pi  1 H  C  0  L  L  E  C  T'  T  3  -  F   j  H 1  -  F  H  F  R  E  Q  7  .  5 


FILE  11 

 rrrs  a 


T U E M Pi ■  I  1 13 1 9 7 7 2. 7 fa .  5 -rl  1 P i'- i fl P^  R i J B E R T P. ?   H N  T #  1  F; U LP ■  ^■■i-S. 

n  U  6  3  C  .  ■  ■  6  ■  3  6  9  -4 ;3  7  0 1  ;    U  i3 1'  i3  C  0  L  L  E  C  T     :3  -  F  O  .  I)  1  -  F  1  4  F"  P'  P 


TAPE  10       data  2        HPS  ID.  4.1     REUuPR     Qil-Flfa)  T4-P12;^       REWORK  12,20 
AHT  SET   F4P0PL1  II:.  ^ 


n  PI  P  3  C: .  7  6  <  3  6  9  4)3701  y  1 1 F1 T  H  C  U  L  L,  E  P  T    i" :  J  -  F  0  i  D 1  -  F"  1  4  ■ 


:99  n2-4,  HI -4 


PF:'i;iG     772'^  ■  ■!  1  1 
Till--:     ^■<7'  AMV  li 


LAMP  ROBERTS 5  HMT#1 
'..  1977,400.:' 


.0.M  Ft  liJSH 
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REWORK  (cont) 


TEMP 
49.3  F 


HEW  PT. 
4  3.3  F 


I i  Id  Id  Id  Id  Id  Id  Id  Id  la  i  S  §  Id  Id  Id  | d  I ]i  | d  id  | d  | d  ; ,.1 ;  S  |  ,j  | ,  1 1  i:i , , , 


PEL.  PLlHl! 

r  9 .  T '  . 


NRTER  DEHS 

7.3  -?n--nt3 


CLUUD  COVER  WIND 

b  3  riph 


^ 1  3  3  i'  lif  1 J  §  \s  I?  I?  W  I?  @  333  @  3  3  3  3  3  3  3  g , « 3 1  d  iii  1  d  1  a  1  d  i  a  .ifiia  f"  farammAvt}  ■>  y  3 
BEST  FIT  FOR  5  CUTS 


R  E  W  0  P:  K  FILE  T  fi  F  E     T I  W  E  ■  Fl  •  -  s.  >     E  F  F'  ft  P.  E  H      T  a  ( K )     3  K;  'i'  B  RIGHT     E  L  E ','  ( d  e  9  :>     P  U  ^^     3  E  T 


1. 


13 


170.  3  I'l  1-3     331 .  1 


9.73  !< 


1 


PRSS  ttFIT  riET(C 


1 


21 


+  HPBW 
3.  17;; 
3.  17( 


T--Ta  DTCCfiS  H>.-Ta 

i::l  e  ■?  3  .  3  d  2  9  3.3903  -r  -  5.65 
d  e  8 .  3  o  3 '?       8.3933;  -r  -  5.21 


LECL  OFFSET:   CFiS  Fl 

0.  8,-'5dt9 

8. 075de? 


*HPBW#1         V-FFICT3R  J(.K 


DT'JShS  Fl'.'       GdriE'  G/T(dB 


NEF 


HUP 


8.808de-?       32.2949  8.93        29.14  K        68.93        61.29     -8.8S3kFU  -6.  OQSkFU 

Id  Id  Id  Id  Id  Id  Id  Id  Id  @  Id  id  Id  id  Id  Id  Id  Id  Id  Id  1 B I d  id  id  i ]i  1 1?  |]:i  1  li  I = y  Id  Id  Id  q  id  Id  id  Id  id  id  Id  Id  Id  Id  Id  Id  Id  id  Id  Id : d  Id  Id  10  Id  Id  ,11  |ii  id  (S  Id  1  d  Id  Id  id  id  I d  id  Id  id  id  id  Id  Id  id  id  Id  id  id  id 

1 8  8  *  ( li  Fl  T  Fl  -  F-  I T' )  / ' :  W  fl  X  D  T'  ( 3  Fl  S  fl )  -  -  T  fi ) 


CUT 


-4.  26"-; 


-1  ■ 
9. 46^. 


0 

-4.6!: 


1 

-2 . 03"; 


1 .  49' 


*HPBW  #1  = 

8. 14741  + 

0.000241   CSC  L  =  0.1435  ( 

ant   HPBW  = 

8.14 

7  9 ) 

Kl  K2 

k3  Kb 

K3        K9        K  flPR-eft 

R-sff  S' 

FU) 

X  i  ( K ) 

3 . 963  8.911  1 

.038  1 . 330 

8 .  9  4'  7  3 .  9  9  '5  3.327  8.6538 

8.93  5: 

'2.  2 

2.326E- 

85 

SITE  ELEV 

A  ■  ■■■   n.  1 1  i  '  1 

uio.  t  er  attn       zt  nit.  h  ati  n 

REFF  #1 

REFR 

#2  nfit 

-DIHH 

8.500  ki'i  8. 

83176  d6  8 

.  8  868     E;  ■  d  6-  ri  3.     8 .  8  3  7  ;E;  d  G 

1 .  055 

8 .  8 1 

3  8         6  6 

.  8  f  t. 

C  <f  Ay  01  TJON  s 

FILE  12  T  U  L  M  fl '  1 '  1 8 1 9  7  7  2  7  C .  5  4  ]  1 C;  h  M  P  P  3  E  E  R  T  S  ?   H  h  T  #  1  R  U  M  /  S  E  T  1.84 

C  H  S  fl  n  W  6  3  C  ,  7  6  ■:.  B  6  9  4  j  3  7  n  1  >  D  H  T  H  C  0  L  L  E  C  T  T  3  -  F  8 1 1i  1  -  F 1 4  F  R  E  Q  7.6 

FILE  13  T U E M flVl 3 1  •? 7 7 ? 7 6 .  5 4 1 1 3 1  i M P  R 0 B E R T 3 ,   H U T#l  R U N / S ET  1.85 

C  fl  S  H  D  W  6  3  C  .  ,■  ■  6  ■'■  3  6  '9  4  ■>  3  7  0  i     D  M  T ;  i  C  3  l  .  L  E  C  T  T  3;  -  F  0  ?  D 1  -  F 1 4  F  F:  E  3  7 .675 


FILE   14  TUEMfl^'181977373. 54 1.  iriiMF-  ROBERTS-    HWTtl  l          '    RUW/SET  1.86 

C  H  S  fl  n  W  6  3  C  .  7  6  -."  3 1. 9  4  j  3  7  8  ■  ;•  U  i  1 1  Fi  C  3  L  L  E  C  T  T  j  -  F  3  -  D 1  -  F !  4  F  F :  E;  Q  7 .  3  3  5 


89 


REWORK  (cont) 


T  H  F'  E   1  U       d  n.  t.  0  2         N  t:  s  1  D  „  4 :  ;     R  E  l\  0 1  ■ '  K     .,  D  1  -  F  1 6  >  T  4  -  F 1 2  F:  E  N  i J  R  K  1  2 .  2  Q 

HONE 

n  t'i  6  3  C .  7  6  S  694'  8  7'  0  1     H  !l  T  ll  l:  ij  L  F.  F:  C  T  J  '3  F  0  ?  L  1  -  F  1 4  ?       X .  5  2  ^  S  6  9  9  >  F  2  -  4 1.  Ii  1  -  4 

F'UH  1 

F^'  F:  LI G     2  7'  b  .541  i  C h  M  P  R  0  B  E  R  T  S  <   fl H  T  #  1 

TUE:      1977  MRV   It)  1977.499) 
7. 985  Qiz^   GO. 0  Ft  DISH 


TEMP  DEH  Pi.  REL  HiJMD  WATER  DENS        CLOUIi  COVER  WIHH 

43.7  F  43.2  F  31.4  '■.  7.4  ■=! n .■- |V| 1 3  5  Q  nPh 

I].  Id  I J  Id  Id  id  Id  Id ,  c ! Id  Id  I J  y  Id  Id  1];  id  fa  fa  id  i  d  y  |  d  i  d  i  l,  :  „ ;  d  id  id  |  d  |  d ;  d  |  j  id  |  d  id  |  d  |  d  id  j  d  |  d  |  d  |  d  id  id  |  d  id  Id  |  d  |  d  |  d  |  j  i  a  it.  |d  id  id  id  |  d  id  |  d  id  |  d  |  d  |  d  id  id  id  id  Id  ih  |  d ,  d  id  |  d  id    id  fa 

BEST  FIT  FOR  5  CUTS 

REWORK  FILE  TAPE     TIME'Hr;;'     EFF  hPER       Ta<K>     SKY  BRIGHT     ELEV(dt?>     RUN  SET 
12.2       11       10  y.359         170.3  I'l  1 2     321.1         5.60  V.  23.9  1  6 

PASS  #FIT     riET(C::'  *HPE;W  T-To,  IiT(ChS  H)/Ta  DECL  OFFSET:   CAS  A 

1  5       21.342        O.lbSdts        0.6085       9.0362  +-     7.92°-;  0.0b3de-=i 

2  5        6.613        9.158db^        0.0905       0.9399  +-     5.37-;  0.068de'5 

-:jHPBW#1        Y-FflCTCR      T<K)        DTujAS  A)      G(dB)       G.-T(dB)        HEF  NUF 
O.gOOde^     179.0370  9.16        28,59  K        69.71         6S.66     -9.067kFU  -0.021kFIJ 

Id  id  Id  Id  Id  Id  Id  Id  Id  fu  (d  Id  |]i  1  d  I d  id  Id  Id  Id  Id  id  1  d ; d  id  id  Id  I iJ  Id    Id  Id  I u  Id  id  I ri  Id  Id  Id  Id  Id  id  Id  Id  Id  id  id  la  id  id  id  id  id  id  Id  Id  Id  id  i ri  i d  Id  i d  1  d  |B  |]l  Id  id  | d  |a  | d  id  | d  fa  fa  id  | d  id  id  id  | d  fi 

1 0  0  *  ( n  A  T  Fi  -  F  I  T  >  /  ( M  A  Xi  D  T  ( C;  A  S  A  >  T  A ) 

CUT  -2  -10  12 

4.31';        -9.53';  5.39";        -9.  19-;  -0.43;-: 

*HPBW  #1  -  9.14741  +  9.000241   CSC  L  =  9.1430     (ant  HPBW  =  0.1474) 

Kl         K2        K3        K6        KS        K9        K        APR-eff     R-€ff     S(FU)  Xi<K) 
0.979  0.91  1   1.999   1.990  9.':'t9  0.993  0.363     9.6599      9.93       592..  2  2.427E-05 

SITE  ELEV        oxY  attn  tmler  o.ttn      zenith  attn      REFR  ttl     REFR  #2  ant-DIAM 

9.599  kn       9.03133  dB     0.00.16  JB/dens     6.6379  dB         1.956        9.9136        66.6  ft 
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REWORK  (cont) 


v3     f  d   tem/^e  UJO 


^  ^  1 


a 

sun  Th 
dhth  s 


Tn.-'iiUTQ?  3=I<FL  ?  -^G--  Tj  f.f'L  T  'Ei-iK'. 
l  =  lSTj2=2rid4.  =Hi:    ;    .  J. 


-rii. 


e  RW  ?  1  LOHD  ?  2HiJTU  (S-I'Ll^ 
SEL:  RUH^^SET(e=EXI  i  J  v  jr- 
DEL :  R1JH-''SET  ( 0=EK I T > ?e 


I)    Tfr*"  OP£fi^T>0V      pun    A     fJEiATUe     sum       Ujitm       THS       SLe^Ar/O^  A^AftLB. 


0  R U J  ILOfl D .^hUTC-} 3=iiEL ?  4U.--T okl  I  •■  £k R '  =  N C s  3  (l) 
TEMptFK  =rnrrT-5^      ?  ^ 


DEW  PT(F><  =HC>?  30.9 
REWORK  #<  =NiJ):  lo.ei 

t 


:>/tf/r  TO  /AioicfiiTB 

WHICH      3'-^  LEfEi. 
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REWORK  (cont) 


TfiPE  9 


d  0.  t  a  2 


NB;>lIi.  4i  RE!4URK 


:'S4;Eo  8e06>  T4-F12i  Dl-Flb 


REWORK  15.81 


HBSlH.Ql  LOFiliE 


^12-4 ■ 


-4 


PROG     276.5407  FT.   DETRICK  FlHT  #1 

THU:      1976  DEC  2       '  1976.920) 
7.319  'IWz^   60.0  Ft  DISH 


/s    /for    /AJ  c  Luoeo  /M 

■THE- 

T  e  ujorh 

JH- 

SET- 

STfiR 

1  J 

G/T  G.'TH 

HPBW#1 

HPBW#2 

FREQ  T 

-f  ac 

HEF 

HUF 

OS 

CflS 

h 

40.084  31.891 

0.  136 

0.  135 

7.319  1 

1  .  945 

0  6  5 

02 

CFlS 

H 

'•J . 

0 

4  0 .  2  4-  0     :3  2 . 2: 4 

0.  143 

0 .  151 

2  -3  9 

1.31 6 

051 

03 

CFiS 

H 

1 1 '. 

1 

40.471  32.422 

0.  145 

0.  136 

7.319  1 

.259 

•1 .  736 

1 

Q  V  3 

05 

CPS 

P 

12. 

4 

4  0 .  5 1 6     3  2  ■.  5 0 

0.  139 

0.  120 

7.319  1 

.  265 

1.726 

1 

S  9  3 

07 

CPS 

P 

9 

0.  144 

0  .  1  3  0 

7.319  1 

.  3;  1  5 

1 .  559 

648 

1 1 

CPS 

P 

6 

4  !3 .  7'  9  9     3  2 .  3  9  8 

0.  146 

0.  129 

7.319  1 

.  299 

1 .  654 

1 

13 

CPS 

P 

4 

41.896  32.543 

8.  142 

0.  123 

7 .  3: 1  9  1 

.  324 

4      CT  cr 

1  a  ■_'  ■_'  I— 

1 

686 

1 

86 

CPS 

H 

6  1  . 

C.  140 

0.  139 

7.319  1 

1 . 590 

623 

09 

CPS 

P 

64. 

6 

40.343  32.157 

0.  143 

0.  1  64 

7.319  1 

.  3 1 0 

1,657 

1 

695 
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RHTORK  (cont) 


TAPE  9        data  2        HBSlD.4i     REiJUKK     <9S4S,dQ26>  T4-F12j  Dl-Flb 


REWORK  15.01 


NBSlfl.ei     LOflDER     <9yl3j0eo3>  TS-FeiBl-FQ^       X. y4<00y2>T2-4i ni-4 

-56- 


PRGG     £76.5407  FT.   DETRICK  RNT  tl 

THU:     1976  DEC  2       (   1976. 920> 
7.319  GHr^   60.0  Ft  DISH 


RUN 


L,/T<dB> 


#  PIS  =  S 

■f.  41.1930  +-  0,125S>  +  <  -0.14234  +-  g.02341>*CSC  L 
40.4494  +-  0.2434)  +  (     0.0093S  +-  S.  08419>*ELEV 


G/TH'::dB>  =(  32.3407  +-  5.1315)  +  <     0.03342        0.02446>*CSC  \l 

G'TflfdB)  =■:   32.5340        3.1357:^  +  (  -0.06452  +-  y .  00132>*ELEV 


HPBUSKde?) 
HPBW#l(dt-9J 


■■(.     0.1423  +-  0.0027)  +  C  -0.00081         9.@e«349>*CSC  L 
0.1435  +-  0.0026)  +  C  -0.00802  ^-  S.  38084 ) *ELEV 


HPBl'i#2<dsg; 
HPBW#2':de5; 


0.1385  i--  0.0153)  +  (  -0.00045  +-  8.002S4)*CSC  L 
0.1279  ^-  8.0136)  +  <     0.80030  +-  8. 00y23)*ELEV 


Y-f actor 
Y-f  actor 


1.3394  +-  0.8036)  +  (  -0.01546  +-  0. 00161 )*CSC  L 
1.2562        0.0221:.  +  <     0.80114  +-  8.  e0038)*:ELEV 


NEF(kFU) 
HEF(kFU) 


1.5377  +-  0.0497)  +  (  8.04083  ^ 
1.7399  +-  e.S318:>  -i-  <  -0.00253  + 


-  3.00925)*CSC  L 
8.00i39)*ELEV 


NUF(kFU) 
NUF<kFU) 


1.5323  +-  0.0511)  +  (  0.07731  i-  0.00951)*CSC  L 
1.9416  +-  0.1193)  +  <  -0.06550  +-  0. 00206)*ELEV 
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REWORK  (cont) 


TAPE  9 


do.t  a  Z 


HeSiri.4l     REUORK     <9843»00O6>  T4-F  1 2 <  D 1 -F  1  6 


REWORK  15.81 


HESlfl.Ul  LCiHUER 


99 1 3  ^  0063 ,    T2-FU  <  D 1 -FO  ^ 


/■!.  04  :;6802 '  T2-4 <  D 1  -4 


PROG     276.5407  FT.   DETRICK  RHT  ttl 

THU:      1976  DEC  2       (   1976. 920 > 
7,319  GHsj   60.0  Ft  DISH 


RUN 


.     TEMP  DEW  PT.           PEL  HUMU            WRTER  DEHS  CLOUD  COVER  WIHB 

53.0  F  30.9  F              43.0                  4.5  •5i'i-nt3  74                  0  nph 

5=  FIT                 #  =  CHS  H             I?  =  CVG  H             0  =  TRU  R  +  -  OR  I  R 

FIT  TO  _  3  DhTR 

HEF(kFU>  =<      1.5377  +-  0.0497)  +  (     0.04003  +-  0 . 00925 *CSC  L 

1.000  1.200          1.400           1.600          1.300  2.000       OJHIT=  0.0200) 

ELEV  !  !  !....!  I  !  !  !  1  ....  !  1         VRLUE       RUN  SET 

9.0  .#  1.8160  3.02 

10  ■■      -  !  .   1.7632  +-  0.243 

11.1  #  1.7357  2.03 

12.4  ■        -          -          #  1.7260  3.05 

15  !  .  !  1.6924  +-  0.201 

20  !  .  !  1.6543  +-  0.177 

24.9  #  1.5594  2.07 

25  •     -  .            ■     !  .  !  1 . 6324  +-  0.  164 

26.6  .   #  1.6545  3.11 

30  I  .  I  1 .  6173  +-  0.  155 

35  !  .  1  1.6075  +-  0.149 

33.4                  .  #  .  1.5524         3.  13 

40  •■  •  '               !  .  !  1 .  6000  +-  0 .  1 45 

45  ..       !  !  1.5943  +-  0.142 

!  .  !  1.5900  +-  0.140 

'§S  '  [       I  .  1  1.5366  +-  0.133 

60  ■             !  .  !  1.5339  +-  0.137 

61.2'  #  1 . 5397         1 . 06 

64.6  .       #  1.6565  33.09 

I  ....  I  ...    I         I         I  I         I       .1     .    I  .  .  I  ....  1 
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REWORK  (cont) 


TAPE  9        data  2        UBS  ID. 41     REUORK     < 9848 > 0006)  T4-F 1 2  - D 1 -F 1 6 
HESlH.Ol     LOftDER    <99l3jyo0  j.>  .T2-F8»  Dl-FO*       X .  04< 0082 >T2-4 >  D 1  -4 


REWORK  15.01 


RUN 


PROG  27b, 
THU:  r:V7» 
7.319  GHz 


5407 
IihC 


FT.  DETRICK  ANT  #1 
'  1976.920.' 


60.0  Ft  TISH 


TEMP  DEW  PT. 

53.0  F  50.9  F 

=  FIT  #  =  CfiS  H 


REL  HU11D 
43.0  ■■: 


'G  R 


WATER  HENS 
4.5  ^fi-  I'ltS 

0  =  THU  fl 


CLOUD  COVER 
74 

+  -  OR  I  Fl 


HIND 
0  I'iPh 


HUF<kFU) 


FIT  TO  8 
1.5323  +-  0.0511)  + 


ELEV 
9 . 0 

10 

11.1 
12.4 

15 

26 

24.  9 

25 

26 .  6 

30 
35 

38.4 

40 

45 

50 

55 

60 

61,2 
64.6 


1 . 000  1 . 400  1 . 300 

I  ....  I  ...    I         I      .  i 


2.  200 
I 


DflTH 

0.07731  + -  0. 00951 >* C 

2.60  0  3 . 0  0  0 

I . . .    I  ....  I . .  .1 


# 

# 


# 

<  ....  I  ....  I  .  .      I         1         I  I 


(UNIT= 

0 .  i; 

1400) 

VRLUE 

RL 

IN  -  SET 

2. 0507 

1.9775 

+  - 

f  :i .  2  1  ■■  2 

1 . 9234 

1 . 3925 

1 . 3310 

+  - 

0 .  S;  i  3 

1.7583 

0.  138 

1 . 6401 

2.07' 

1.7152 

+  - 

0.  1^2 

i .7319 

.  1  i 

1.6869 

+  -- 

0.  It3 

1 . 6671 

J — 

0.  156 

1.6061 

1 . 6526 

+  - 

0.151 

1 . 6416 

0  .  1  '\  7 

1.6332 

+  - 

0.  145 

1 . 6267 

+  - 

0.  143 

1 . 6216 

0  .  1  4 1 

1 . 6232 

1  .  06 

1 . 6945 

1 :  ,  0  3 
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REWORK  (cont) 


T  H  F'  E  9        d  0.  t  n  2         l\  B  3  1 IJ .  ^l- 1     R  E  I'-i  iJ  R  R.     \  9  8  4  B  j  U  0  6  6 ;  T  4  -  F  1  £ '  D  1  --  F  1  6  R  E  U  0  F:  R   1 5  .  0 1 


\\ E: 8: 1 H .  0  1     L Ci H Ii L R     <  9 B 1  3  -  B u B 3  :    T 2.  F B  ?  !. :  I  -RB,       K .  0 4 <  0 0 y  2 ;  T' 2  ■  ■  4  ?  D  1  - 4 

-59- 


.  RUN 


PROG  2 ?F.  541:17'  FT.   DETRIGK  RNT  #1 

THU:  19:"o  UE:C  2       (  1976.928.:' 

7.319  GHzh   68.0  Ft  lUSH 

TEMP  DEW  FT.  RE  I,.  HUMH  NflTER  HENS        CLuU]?  COVER  NINlJ 

53.0  F  30.9  F  43.0  "i  4.5  ■?ri.-nt3  74  B  nph 

:  —  ~  n     iz  zr     ~  z: :::     —  ™        ~        ~  :z  -:  :r  ::::     ~  zn  —  r-     rj  ~:.  —     .-z;  :r  z::  =  —  z:  ™     z:  rr  —  —  :::  z:  zz  z:     ~  :r  —  ~;  r:  ~  z:  zr  z:     z:     :z:  :^ 

FIT  tt  =  CHS  H  e  =  CVG  H  0  =  TRU  H  +  -  -OR  I  H 


FIT  TO       3  lifiTR 


G/T( 

:dB) 

=  41.1 

930 

4 0.  1258;'   +  ':; 

-0. 14234  +- 

0.02341) * 

CSC  L 

40. 

,  000 

40.400 

40. 

1 3  0  B  41.200 

41 . 600 

4  2  .  0  0  0  '■ 

UNIT  = 

0.0400 

ELEV 

1 

1          1  i 

1         1  1 

1         1  1 

RLJJE 

RUN. -SET 

9 .  0 

#. 

40 

.  2403 

3. -02 

10 

 i 

40 

■i   0.543 

11.1 

.  # 

40 

"  4714 

2.  03 

12.4 

# 

40 

.  5162 

■S-.'OS 

15 

1 

 1 

40 

.6430 

+-  0.453 

£0 

40 

.  7763 

+  --  0.-4i3 

24.  9 

41 

.  0392 

2.  0  ':^ 

5 

40 

.  8552 

+  -  0.3';^ 5 

26 .  6 

#'  . 

40 

.  7991 

3.  1-i 

30 

 .  ! 

40 

.  9033 

+-    0 . 330 

i 

.-  ■  -  - ,  1 

40 

.  9443 

+~  0.369 

38.  4 

.  # 

41 

.0961 

48 

i 

 ^  1 

40 

.  9716 

+  -  -  0. 362 

45 

1  

1 

40 

.  9917 

+-  0.356 

50 

1  

1 

41 

.  0072 

+-  0.352 

55 

1 

1 

41 

.  0192 

+-  0.343 

60 

1 ... 

-  ! 

41 

,  0236 

+  -  kI  .  3 4  6 

61.2 

#. 

41 

.0199 

1  .  06 

64.6 

# 

40 

.  8476 

33 .09 

1 
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REWORK  (cont) 


TAPE  9  data  2  NbSIH.  41  REWUi-K  < 9840)8006)  T4-F 1  2 :  Ii ] -F 1 1 
NBSlH.ei     LOhDEF:  <9913j0083:> 


-FO.Dl-Fyr 

-r,fi- 


,  04<  QQQ'd >T2-4  J  D 1  -4 


REWORK  15.01 


RUN  3 


PRi 
THi 


540^ 
DEr 


FT.    riETRIUK  HHT  #1 


19  bH:?  bO.O  ht  niSH 


TEMP 
53.0  F 


=  f: 


DEW  PT. 
30.9  F 


REL  HUMIi 
43.0  ■■. 


WATER  DENS 

4.5  ■=in.-^nt3 


CLOUD  COVER  MIND 

74  0  riPh 


#  =  ChS  H 


y  =  uYu  H  0  =   ! hu  a  +  =  OR  I  H 


G/Ta(dB) 
■  31 . 000  31 . 400 


ELEV 
9 .  0 

10  - 

11. 1 

12.4 
15 " 

28 

24.  9 

26 . 6 

39 
35 

33.4 

4y 

45 

50 

-J 

60 

61-.  2 
64. & 


FIT  TO  _  8 
=  (  32. 3407  +-  0.1315;'  + 


DATA 

0 .  0  3  3  42  +  -  0 .  8  2446  *  C  S  C  L 


c!  1 .  yyO 
I        I  I 


33 . 680 
!....!....! 


3  3 .  8  0  0     ( U  H I T  =  ti .  U  400; 


ALUE 

R 

JN- 

SET 

.5243 

02 

IT  ■■*">  -~. 

+  - 

0. 

545 

.  4220 

.  5893 

05 

.  4693 

+  - 

0  . 

461 

.  4384 

+  - 

0  . 

4;-:  8 

.  5345 

87 

.4198 

+  - 

0  . 

3  9  7 

.  3^77 

ii 

.  4075 

+  — 

0. 

.  3998 

+  - 

0 

.  5488 

+  - 

0. 

364 

.  3388 

+  - 

0. 

359 

.  3343 

+  - 

0 

354 

.  3815 

+  - 

0. 

351 

3793 

+  - 

0 

.  3776 

1 

86 

.  1573 

i  .  .  I 


97 


REWORK  (cont) 


TRPE  9        do.t,o   ;        nuSl  D.  'l  L     RE'NOKk       9843,UUUb>  T4-F 1 2 ^  D i -F 1 6  REWORK  15.01 

X.  04<0O82  >T2-4j  Iil-4 


HB31H.01     LUHHER     09 1 3 ?  Oyy.J  ■  T2-Fti -  H  1 -F0 

-  6  I  - 


PROG  37'^..  5 4 'J 7 
IHU:  1973  DEC 
7.313  GHz'i   60.  y  Ft  DISH 


FT.   DETRMP:  FINT  ttl 


.RUN 


TEIIP 
53.0  F 


DE 
30 


=  FIT 


.■^  F 

Ch3  H 


PEL  HUMLi 
43.0 


WFiTER  DEH5 
4.5  ■9n.|'rt2 

0  =  TFlU  R 


CLOUD  COVER  WIND 
74  0  riph 

+  =  OR  I  H 


HPBNttl  (de-g; 
0.  130 


FIT  TO 
0 .  1 428  +-  0. 002' 


DhTh 

-0 . 0000 1 


0.  0004'?)* CSC  L 


ELEV 
9 .  0 

10 

11.1 

12.4 

15 

20 

24.9 


40 
45 
50 


0.  1  34 
I  ....  I 


0.  1 


bO 
61  . 
64. 


0. 142  0. 146 

!....!..,.!....!.. 

# 

I  I 


I  ....  I 


# 

I    ...  I 


0.  150 

I  ....  I 


'::UHIT= 
VALUE 
0. 142? 
0. 1427 
0. 1446 
0. 1390 
0. 1427 
0. 1427 
0. 1444 
0. 1427 
0. 1462 
0. 1427 
0. 1427 
0. 1423 
0. 1427 
0. 1427 
0. 1427 
0. 1427 
0. 1427 
0. 1396 
0. 1431 


0 . 0004 ) 


R 

JH/bET 

3 . 02 

+  - 

0.  002 

3 .03 

+  - 

0.  002 

+  - 

0.  002 

2.  07 

+  - 

0.  002 

3.11 

+  - 

0.  002 

+- 

0.  002 

3.13 

+  - 

0.  002 

+- 

0.  002 

+  - 

0.  002 

+  - 

0.  002 

+- 

0.  002 

1 .  06 

33.  09 

I  .1 


98 


REWORK  (cont) 


TRPE  9 


d  0.  t  n 


NBSlIi.4i     REUORK     <.9S4B>m&6>  T4-F  1 2 1  L 1 -F 1 6  RENORR  15.01 


HBSlfl.Rl     LOflriER     < 95 13,  550:::: 


X ,  e4\  5352 T2-4  ?  D 1  -4 


PROG     27'r;:,-.|.Mr  FT.    DETPICl::  FlHT  #1 

THU:     t97>:  DEC  2       •.;  1976.920' 
7,:319  GIIsh   60.0  Ft  l!l:3H 


RUN 


TEflP 
53.0  F 


DEW  PT 
3  0 .  9  F 


REL  HJMD 
43.0  "■. 


WRTER  DEHi 
4.5  ■?;'i/irt-:: 


::LOUD  COVER  WIND 
74  0  nph 


=  FIT 


Ch:3  fl 


CtG  H 


'hlJ  H 


OR  I  H 


HPBW#2(deg: 


0.  l: 


FIT  TO  2 
+ -  5.0153)  + 


DRTR 

-0 . 0004': 


+  -  0 .  i.'iM2:-:4 


;;c  L 


ELEV 
9 .  0 

10 

11,1 
12.4 

15 
20 

24.  9 

5 

26.  6 

30 


40 
45 
50 


60 
61 . 
64, 


0.120  0.130  0.140  0.150 

!....!  !  f....  !  !.. 

# 

I  ,  


0  .  160 


I  


# 


0.  170 
I  ...  I 


:UHIT=  0.001 

■'hlue  run/ 


0 . 

0. 
0. 
0  . 
0  . 
0  . 
0  . 

0 . 

0. 
0  . 

0 . 
0 . 
0 . 
0 . 
0 . 
0 . 
0 . 

0  . 

0 . 


;9  +- 


364 
204 


374  +- 

:3  7'  6  +  - 

377  +- 

3  78  +  - 

3  7  F:  +  - 

3  79  +  - 

379  +- 

3  3  0  +  - 
390 
641 


0. 


0 . 

0  . 
0. 

0 . 
0. 
0 . 

0  . 

1 . 


y  :• 

SET 

02 

015 

03 

05 

015 

015 

07 

015 

1  1 

015 

0 1 5 

13 

015 

015 

015 

015 

015 

06 

09 
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REWORK  (cont) 


■'flPb.   9  do  to. 


■I  D  -::>  J.  V  .  '  I-  J.      r\  l:  i  ■<  l.'  i'-.  r 


'  y  4  y  )  0  t.i  U  b  '■■    r  4  -  r  i  i;:  '  ii  1  -  h  1  i 


REUORt:  15.01 


tlBSlH.Ml  LOhDER 


3  J  O0u3  :    T£-F  ij  1  .[1 1  -  F'  6  > 


U4\ 0002  >T2-4  H  ril-4 


PROG     .dr€.54ij?  FT.   nETFICi:;  HhT  ttl 

h! IJ :      1 9 7 b  D E C  2       <'    1976.  929 
7.31?  GHz?   60.  iJ  Ft  LISH 


RUN 


TEHP 
53.0  F 


=  FIT 


BEN  FT, 
30.9  F 

#  =  Cms  Fi 


REL  HUMIi 
43.0 

&  ---  CVG  H 


NHTER  jEHS 
4.5   ■?  I  i .  •  ■  I  i  '\  'S 


CLOUn  COVER  NINIi 

74  0  riF-'h 


0  =  TflU  H  +  -  OR  I  H 


FIT  TO 


'-f  n  et  o  r 
1  .  200 


1  .  240 


ElEV 
9 ,  0 
10 

11.1 
■12.4 
15 
20 

24.  9 

'■'i 

26.6 
30 


5U 
60 

f,  1  ^  V 

64.  6 


1.,  230  1.3  20 

i  I  I  I 


i  -  -  I 


!  -.  -  ! 
I  -  .  -  I 

=  # 


DflTR 

-0.Gi54r 


1 .  360 


0, 00161 

1  .  400 

I 


*CSC  L 

(UNIT= 
VhLUE 
1.2594 
1 .2504 
1.2593 
1.2653 
1.2796  H-  - 
1.2942  +- 
1 . 3148 
1.3023  +- 

1.3035  +■■ 
1.3124  +- 
1.3243 
1.3153  +- 
1.3175  +■■ 
1.3192  +- 
3205  +- 
3215  +- 
3  2  1 3 
0  '9  5 


0.00 
RUN 

+  -  0 


1 


40; 
■SET 

02 

003 

05 


1  1 

0  0  i; 


OOi 
0  0  ;■ 


I  i  I 
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REWORK  (cont) 


TRPE  9        data  2        NB:5lIi.4l     REWORK     -. 9848 >  6886 >  T4-F125  D 1 -F 16  REWORK  15.81 

NBSlH.yl     LOADER     < 99 1 3 -  80:33 )  T2-F0 D 1 -Fy  ?       X .  04< 0082 >T2-4  j  D 1  -4 

-64- 

RUN  3 

PROG     27t.548?  FT.    DETRICK  HhT  #1 

THU:     1976  DEC  2_  1976.928..' 
7.319  LKz?   68.8  ht  LISH 

TEMP  DEW  PT.  PEL  HUND  WATER  DENS        CLOUD  COVER  WIND 

53.8  F  38.9  F  43.8  ■■.  4.5  •;i'i.-n  ;  3  74  8  nPh 

FIT  TO      8  DflTH 
HEF kFU>  =(     1.5377  +-  8.0497)  +  <     0.84803  +-  8 . 68925 ) *CSC  L 

+  =  L I  i  i  E  ri  R  U  u  i  1 T  K I B  U  T I U  i  J 


10.8de=i:  HEF'kFU)  =     1.763  +-  8.56  dB        <     13.7  JO   '       7.319  GHZ 

_E-S      E-F       E-Y       E-Kl     E-K2     E-K3     E-K4     E-K5     E-K6     E-K7  +E-K3  +E-K9  E-TP 
J.  96';     0.68     6.51     2.66     1.39     8.80     8.86     3.52     8.35     2.57     5.65     8.14  8.62"'; 

G<dE)  ij-dif f  TOO  TaOO  Y-fac  hPBWe rr  data  fit  c<l-K2>  bright  effftRER 
61.15       0.11     119.6      727.1     1.2566       1.81  %     8.147  dE     13.18";   13.11  K  174.8 

2.38=h2  0.26  =  C9  8.1=D1  3 . 1 4345=H ( 2 1 j 1 )  460=T< 1 ?  9)  8. 9243= J 1 
0.75=DS     8.1o  =  D9     8.  1==C3     8 .  0e2b0=H '■  2  i  ?  3 )       15  =  T<1)11)     i.  8269-82 

*HPBU  ttl  =  0.14276  +-8.808886  CSC  L  .=  8.1427     (ant  HPBW  =  8.1419) 

Kl         K2        K3        K6        KS        K9        K  _     RPR-eff     R-eff     S(FU)  Xi(K:' 
8.951  8.984  1 . yya  1.088  8.932  8.992  8.795     8.6461      8.93       593.4  2.388E-e5 

SITE  ELEV        oxv  attn  wut.tr  uT-tn      zenith  attn      REFR  #i     REFR  #2     ant  -  BI AM 

8.187  kn      8.83443  dB     8.8837  dE'dens     8.8331  dB         1.831         8.8138        68,8  ft 


28.  8d>;-9: 
E-: 


WEFa::FIJ; 


8.45  dB 


18.4 


319  gh: 


E-K3  F-K4  E-K 
8 .  8  R     0  .  8  h     3 .  ,  ■ 


E-K6 


:-K7  +E-K8  +E-K9  E-TA 
i: .  67     2 .  99     8.84     8 .  65 


E-F       E-V       E-k:1  E-K2 
6  .  Li9".     8 .  88     8.48     1.41     1 ,  4 

/  4 1  #  #  #  #  #  ^i£iiMlMl  *  ^  « - 


^-^:.;:dB 

61 .  85 


G-dif f 
0.8) 


T(K)       To.'K.'A'    V-fcc-     HPBNe rr     dct-a  fi' 
,.86.6  1 . 2936       1.31   *.     8.  147  d! 

i:.38  =  fl2     8.28  =  C9     8.-I-I11     8  .  :    ^::|'^^i'>^:<j^  1       468  =  T  '  1  -  9 
^ir_r.-.     ,-,   ic.--,.r,  1..,-..     ifi .  0y£"68--N  2  iTX'"^      1 5  =  T  (  f  J  1 1 


8. 75-118     8.18-ii9  8,1- 
*HPBW  #1  ^  0. 14276 


1-K2)  bri-5ht 
13.  10".     6.  74  K 

0.9611  =  .J1 

1 . 8856=82 


€ f f hREH 
178, 


8,8t:iy886  CoC  L   -  8.  142i 


8.1419 


Kl         K2         K3  \:C 
6 .975  0 . 9  84  1 , 8  y  0   ] . 0  8  8  8 . 


T.'J  K  hrR--i  + 

8 . 998  y . 848     8 . 6459 


8 .  93 


2. 455E-85 


REFR  ^1     REFR  #2  ant-DIiUl 


3 1  IE  ELEV        o  •.<•■•■•  at  tn  Mat  e  r  attn    _z-nith  nt-n 

8.187  kn  8.83443  'it:  8.863.'  iJP  u^irr^  y.0381  d3  l.OJl  0.8138  68.0  tt 
♦i«#nSi!<5#<}f!##ti^#S#'itft#4;tr}!.ijTi{i  +1  +!■  It  h-  W  if  •.,  it  ir  1!  it  it  ;t  u  ii-  #  ^^  \:  4  -  r :;  ir;  k  ti  #  s .;  tt  s  It  «■  ii  ii-  n  47  #  #  iMi  #  ;-i  ti  'A  'A  nil  it 
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REWORK  (cont) 


30.6de-g:  HEF'AFU"'   =     1.613  +-  0.46  dB  9.7  '■:')  7.319  GHZ 

E-S      E-F       E-V       E-Kl     E-K3     E-K3     E-K4     E-r5     E-K^     E-h:7  +E-K3  +E-k9  E-Th 
b.lU';     O.UCi     y,4j     0.93     1.43     O.fty     U.Oo     3.bl     3.3C     2.58     1.9/     W.u3  d,h3'-:,-< 

G(dB)     G--ditf     T'f:::)       Ta'.:K>  HF'BNfrr     do.^"  a  fit     c.  1-K2>  Dri?hT  tffRREfl 

61.03     -0.82     102.7       737.1     1.3039       1.31  '.     0,147  dE     13.10\     4.63  K  169.0 

2.30=R2  0.20=09  0.1=111  0,  1  4345=N 2  1 J  1  460  =  T(1.  9  j  0.9732  =  31 
0.75=Ii3     0.1S  =  D9     0.1=03     0 .  002fcO=N  f  3  i  -  3  '       1 5  =  T  1  ;  1  1  j  1.0521=02 

*HPBU  #1   =  0.14276  +-0. 300000  030  L  =  0.1427     (ant.  HPBU  =  0.1419) 

Kl         K2        K3        K6        Ky        k9        K        HPR-e+ f     R-=ff     SCFU)  Xi';:K) 
8.983  0.904  1.000   1.000  0.976  0.999  0,366     0.6453       0.93       593.4  2.506E~O5 

SITE  ELEV        oxy  o,tt.r,  uott-r  ottn       zenith  attn       REFR  ttl     REFR  #2  ont-DIRM 

0.107  kn       0.03443  dE:     0.0O:;7  dB/di=ns     0.0331  dB         1.031         0.0 130         60.0  ft 

#############################tt#tt####tt##lT#####ii###4tt####tt###tt#tttt####tt*tt##tt#tttt###tt 


40.  Ode-?:  HEF'.kFU)  =     1.600  +-  0.38  dB         (       9.1  7.319  GHZ 

E-S      E-F       E-V       E-Kl     E-K2     E-K3     E-K4     E-05     E-K6     E-f;7  +E-kS  +E-K'9  E-Tfl 
6.04'-:     0.00     0,43     0.72     1.41     0.00     0,06     3.57     0.36     2.55     1.51     O.Ol  0.62'; 

G  ( d  B  G  -  d  i  +  f  T  K. )  T  o,  ( f :  >  V  - 1  o,  c  h  F  B  N  e  r  r  d  o.  t  n,  tit  .-  (  1  -  h:  2  >  b  f "  i  ?  f  1 1  €  t  f  H  R  E  H 
61.01     -0.03     100.9       727.1     1.3165       1.31         0.147  dB     13.1  Q':     3.61   K  163-4 

2.30=h2  O.20=C9  0.1=D1  0 .  1 4345--H  ( 2 1  ?  1  )  460=T':i»  9)  y.9791=Jl 
0.75=ri8     0.13  =  ri9     0.1=03     0.  OO260  =  H(21  J  3)       15  =  Ta)ll>  1.0411=02 

*HPBU  #1   =  0.14276  +-0.000OO6  CSC  L  =  0,1427     (ant   HFBN  =  0.1419) 

Kl         K2        K3        Kb        t.3        K9        K        flPR-eff     R-eff     SCFU)  Xi(K) 
0,936  0.904   1.000   1.000  0.931   0.999  0.875     0.6453       0.93       598.4  2.531E-05 

SITE  ELEV        oxy  attn  water  attn      zenith  attn      REFR  ttl     REFR  s2     ant -HI  AM 

0.107  kri       0.03443  dB     O.00:::7  dB/dens     0.0331   dB         1.031         0.0130         60.0  ft 

#tttttttttt#######tt###########lf#tt'jl##tttttt#f!##MtttttF###tt####ttt##ttlt#tttt*ttttif#### 


50.  Ode-g: 


HEFCkFU 


dB 


7,319  GHZ 


E-S  E-F  E-Y  E-Kl  E-K2  E-K3  E-K4  E-t; 
6.01'-;     0.00     0.43     0.60     1.40     0,00     0.66  3.5 


E-K7  +E-K3  +E-K9  E-TFl 
2 ,  5 1.26     0.0]  0.62" 


#####tttt###tt####tt##ttttftft-,^tt#T:  iNiiMtttlrtitttttti  i,tt*,##fitttttttf#;;,t###t>T;##ttStt#tttt#+Ut  ffttiUftttttt##ttiM:ttrt 

G  ( d  B )     G  -  d  1  f  +     T  (  K  )       T  a  K        'r'  -  f  o  c     H  F'  B  H  e  r  r     d  o  +  a  tit     c   1  -  K  2  )  b  r  i  3  h  t.     ^  t  f  H  F'  E  H 


61.00  -0.04 


1  1 


1.31 


0, 147  dB 


10- 


: .  0 


163.  1 


2.30=fl2  0.20=09  0.1  =D1  0.  14345=H(21  !  1  )  463=T':l)  9 
0.75=113     0.13  =  H9     0.1  =  08     Ci.  fn3260=H'- 21  j  3>  15=T'ljll 


0, 9824- J 1 
1  , 0353=02 


*HPBW  #1 


0,14276  +-0.000006 


.0  L 


0,  14: 


(ant  HPBU 


Kl  K2  K3  K6  Ky  K9  K 
0.939  0.904  1.000   1.000  0.934  1  .  OoO  0.8 


HKR->.?tt  R-er 
0.6453  0.93: 


0,1419 ) 

FU 


2. 545E-0' 


SITE  ELE  V        o  X  y  o.  %  t  n  i  .j  o  t  a  r  a  t  t  r  i      z  e-  n  i  t  h  -jt.t.n      PEf-P  ttl-    R  f  F  i '  ».  2     a  n  t  ■-  D  I  p  ri 

0.107  k  I'M  0  .  0  3: 4  4  3  >.\ y  0  „  1 3  0  3  7  6  B  /  d  t  r i :  0 .  O  3 :?  l  d  B  1  .  0  ;  1  0,01  3  0  ^  0 ,  f  t 
#  tt  tt  tt  tt  #  tt  tt  tt  tt  #  tt  tt  fl  tt  tt  tt  tt  tt  #  tt  #  #  #  #  #  #  it  #  #  tt  #  tt  tt  tt  tt  tMt  !i  #  fl  #  If  tt  tt  #  #  4  S  ii  B  -rr  #  #  S 1  ■  tt  #  it  #  #  +t  it  #  (I  +1-  li  ti   il  it  tt  tt  -ft  #  ^  # 
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REWORK  (cont) 


TAPE  9        data  2        NE:SlIi.41     REWORK     < 9848 »  0096 >  T4-F  1 2 -  D 1 -F  1  d  REWORK  15,01 

HBSlH.yl     LOhDER     <  99 1 3 »  0003  •■  T2-F0J  Dl-FO?       K.  04  :  0002 ;  T3-4  >  D 1 -4 

RUH  3 

PROG     276.5407  FT,   DETRICK  RNT  ttl 

THU:     1976  DEC  2       '    1976. 920 ;■ 
7.319  UH-:<   60,0  Ft  tISH 

TEriP  DEW  FT.  REL  HUMD  WFlTER  DENS        CLOUD  COVER  WlfH) 

53.0  F  30,9  F  43.0  X  4.5        .■■■it3  74  O  fiph 

FIT  TO       3  DhTh 
NUFCkFU)  =<     1 . 5323  +-  0.0511'  +  (     0.07731.  +-  0. 00951 )*CSC  L 

+  =  LIHEHR  CONTFIBUTIOH 


10.0de?:  HUF(kFU>  =     1.97S  +-  0.55  dB         (     13,7  7.319  GHZ 

E-3      E-F      E-Y       E-Kl     E-K2     E--K3     E-K4     E-K5     E-K6     E-K7  +E-K3  +E-K9  E-Th 
5.94';     0.00     0.51     2.66     1.39     0.00     0.06     3.63     0.35     2.57     5.64     0.14  0.61'; 

####################  tt########fitttt#«###fl#?tttt####it###############tf###tt###tt####tt#### 
G<dB>  G-diff  T(K)  Ta<K>  Y-f  ac  HPBNe  rr  dax-a  fit.  c(l-K2)  bright  ef  f  fiREfl 
61.15      0.11     119.6       727,1     1.2506       1.81         0.151  dB     13.  10^.  13.11  K  174.0 

2.30=h2  0.20=C9  0.  1.-111  0.  i4345-Hv2i »  1>  460=T:i5  9/  9. 924S-.J1 
0.75=D3     0.13-D9     0.1  =C3     0 .  00260=.H 2 1  ?  3 >       1 5=T  ( 1  j  1 1       1.02-.15  =  C2 

*HPBW  #1  =  0.14276  +-0. 000006  CSC  L  =  0.1427     (ant  HF'BW  =  0.1419) 

Kl         K2        K3        K6        K3        K9        K        flPR-eff     R-eff     S(FU)  KKK) 
0 . 95 1  0 . 904   1 . 000   1 , 000  0 . 932  O . 992  0 . 795     0 . 646 1       0 . 93      593 .4     2 . 300E- 05 

SITE  ELEV        OX/  attn  wo.ter  o.ttn      zerath  nttn      REFR  #1     REFR  #2  ant-DIflM 

0.107  kn  0.03443  dB  0.0037  dB  dens  0.0331  dB  1,031  0.0130  60.0  ft 
####################tf#»tt#####Tttt#rt##tt##S»##tt##tt<f#tt#####tttt##Stt#tt#####ttfftt###tt##tt### 


2a.0dpg:  NUF(kFIJ:'  =     1.753  +-  0.45  (     10.9  ^)  7.319  GHZ 

E-S      E-F      E-Y       E-Kl     E-K2     E-K3     £-K4     E-K5     E-K6     E-K7  +E-KS  +E--K9  E--TFi 
6.26';     0.00     0.43     1,40     1.46     O.OO     0.06     3.32     0,37     2.66     2.97     0,04  0.65"; 

tt####»tt####»######«#######tt#tttt#tt###ttrttt#tt#####tt#########tttt#tt##tttt###tt###########^Ftt 
G':;dE)  G-diff  T(K>  To-(K,:'  Y-ta-  HrEWerr  do.' o.  fit  r(l-K2)  bfi^iht  effflREri 
61.05      0.01     106,6       727.1     1,2936       1.31  ';     0.151   dB     13.  lO";     6.74  K  170.2 

2.30=Fl2  0.20~C9  0.1=Tii  o.  14345-H':  21  j  1  ■^60  =  Ta)  9)  0.9611=31 
0.?5=D8     0.18=D9     0.1  =C3     0.00260  =  1^21.3)       15=Ta.ll)     l.G796  =  C2 

+HPBN  #1  =  0.14276  +-0.000006  CSC  L  =  0.14  27     (ant  HPBW  =  0.1419) 

Ki         K2        K3        K6        KS        K9        K        HPR-^;ff     R-efi      S(FU;'  XKK' 
0.975  0,904  1,000  1.000  0.965  0.'^93  0.848     0.6459      0.9S      593.4  2,455E-05 

SITE  ELEV        oxy  at.tn  wattr  attn      zenith  at-n      REFP  #1     RF.FR  »2  ant-DlHM 

0.107  kn      0.03443  dB     0.0037  dC-  defii     0.0331  dB         1.031         0.0130        60.0  1 1 
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REWORK  (cont) 


30.0dp?:  HUF'kf-U'         1.63?  +-  9.40  dB         (       9-?  7.319  GHZ 

E-S       E-F       E-Y       E-l-  1     t-R2-  E-K3     E-K4     E--K5     E-K6     F-K7  +E-KS  '-^E-K9  E-TFl 
b.09';     0.00     0.44     0 .  j2     1.-^2.     3.00     3.06     3.73     0.33     3.57     1.97     3„  33  0.6::". 

#  #  #  :H4t  tt  #  tt  tt  tt  #  tt  #  tt  #  #  it  tt  #  ^  #  #  It  It  it  t|:  tf  it  tl'  it  -ff  ft  ff  tf  TF  #  It  tf  tt » ti:  #  tf  #  t?  #  #  S  #  #  #  #  tf  tt  It  tt  #  #  #  It  tF  f,  it  it  tJ  It  It  :|t  It  #  #  #  H  tt  #  It 
G  ( d  B )  G  -  d  i  f  f  T  ( r ;  :>  J  a  >"  K  >  V  - 1  c  H  F  E  N  t  r  f  d  o  t.  ,t  f  1 1  r  f  i  -  i ^  ■  i  t:  r- :  -i  i-  -i  t.  p  i' t  U  P  E  fi 
61.02     -0.02     102.7       72, -,1     1 .  :5kiS9       1.31         0.151  d&     13.10'.     4.63  K  169.0 

2 .  3  0  =  H  2  0 .  2  0  =  i:  9  0.1-^  I.i  1  0  .  1  4  3  ■  1 5  -■-  N  ■-  2  1  1 : '  4-60  =  T  ■  1  ?  9  3.97  2  ■-  J 1 
0.75  =  Ii3     0.13  =  ri9^   0.1=C3     0 .  00260  =  ii 2 1  ?  3 15-T:i<11;'     1.0493  =  32 

*HPEW  #1  =  0.142  36  ■!  0.0O000O  CSC  L  =  0.1427     cani  HFBW  =  0.1419:' 

Kl         K2        l<3        Kb        KS        k:9        K        FiPR-ttf     R-eff     S(FU3  vvifK:.' 
0.933  0.90^^   1.000   1.000  0.976  0.999  O.Sfab     0.6453       3.93       593.4  2.506E-05 

SITE  ELEV        oxy  attn  uciter  o.tt.i-i       zenith  attn       REFR  #1     REFR  #2  Fint-Iill-iM 

0 .  1 0 ,  ■'  k  r  i  0  .  0  9;  4  4  3  d  B  0 .  O  3  3  7  '-.i  V  ■ '  d  e  n  r  0,0  3  3 1  d  3  1  .  0  I'  i  0.01  ::i  0  60.  Ci  f  t. 
##  tt  tt  tt  #  It  ##  tf  ####  it  ###  tt  #  ti:  tF  ft  tl  it  #  iT  #  tf  1i^  #  #  #  It  tt  tl  #  it  #  t|:  #  #  #  #  #  it  #  #  #  ?t  it  #  it  #  #  tF  #  #  ti  #  ±F  t^  tt  it  it «  #  #   ii^  it  it  #  #  tf  #  ^-  #  tt  tf 


4o.0d€?:       ,         ^    .      NIJF(kFlj>         1.553  +-  0.33  dB         (       9.2  ■■;)  7.319  GHZ 

E-S      E-F       E-Y       E-4-a     E-K2     E-k3     E- K4     E-K5     E-t06     E-K-7  fE-KS  +E-fF:9  -  E-TiH 
6.03';     0.00     0 .  4  J     0.72     ],  .    1     0 .  0  0     0.06     3.63     3.36     2.54     1.51     O .  O  1     i3  .  6  2. " . 

#  #  tMt  tf  #  #  tt  #  tt  it  tf  it  #  ft  #  #  tf  tt  tt  :ff  tt  it  It  ii^  tf  i  f  ft  ti'  tf  #  :ff  it  tf  #  #  #  #  #  #  #  #  tf  it  #  #  tf  #  ti  it  It  #  *  #  #  tt  #  #  tt  it  tt  tt  tt  It  tt  #  tt  it  #  tf  it  tt  it  It  tl^  tt  it  #  tt  tt 
G  ( d  E!  ;>  G  -  d  1 1  f  T  ( h: '}  T  k:  Y  - 1  c!.  c  H  F  E  N  e  r  r  ^  j  •  j. '-  o.  f  1 1  r.  i:  1  -  f: :  2  >  h  r  i  -=i  ki  t  e-  f  i '  i"i  F:  [:  H 
61.01     -0,03     100.9       727.1     1.3165       l.Sl         3.151  dB     13.  lO'.     3.61  K  163.4 

2.30  =  02  0.20=39  0.1=111  0,  14345-ii'- 21  -  1  )  460=T-  l?  9;'  3.-9791=31 
0 .  75  =  ri3     0 .  1 3  =  Ii9     0  .  1  =33     0 .  30260  =  |-t  ( 2 1  j  3  >       1 5  =  T  3L  ?  1 1 1 .  3333  =  32 

*HPEU  ttl   =  0.14276  +-0.000006  iJSS  L  =  0.1427     (ant  HPBN  =  0.1419;' 

Kl         K2        K3        K6      ■  K3        K9        K        HFR-eff     P-eff      rvFUY  k;i(K> 
0.936  0.904  1,000   1.000  0 .  9  '2 1  3 .  9  9  3 .  Ek?'  5     0 .  6  4  5  3       0 .  9  '9       3  9  2  .4     2.5  2\  1 E  -■  0  5 

SITE  E L E  V        o X y '  o. 1 1  n  w a t.  e  r  a 1 1  n      z e n  i  t  h  a 1 1  n      REFR  #1     R E F R  # 2     o. n t  - D I  fl M 

0.107  k  rii     0.0344  3  d  B     3 ,,  O  3  3  7  d  B  '  cj n      0 .  0 :3S;  1  d  B         1  .  O  ?  1        '  0 .  0 1  9;  0    ■  •  <  6  0 ,  iJ  f  t, 

#  tt  tt  #  #  tt  tt.  it  tt  tt  it  #  it  tt  it  tt  #  #  #  tt  tt  tt  tt  tt  tf  #  it  #  #  tt  tt  tt  It  if  tt  tf  ti-  ^  tf  ti  tt  tt  tf  it  tt  tt  tt  #  #  #  #  tt  #  tt  tt  #  tt  =  t  tt  tt  ft  tt  tt  tt  tt  tt  tt  tt  tt  tf  it  tt  tt ;  i  ft  x\  tt  k  tt  tt 


5  0 .  0  d  e  9 :  ti  U  F  ( V  F  3  '         1 .  6  3  3  +  -  0 .  3  7  d  B         (       3 .  9     ')  7 .  >i  1  9  G  H Z 

E-S       E-F       E-Y       E-Kl     E-K2  ^  E-K3     E-K4     E-K5     E-KS     E  K7  +E-K9  +E--K9  -  E- Tl-i 

6.00".     0.00     0.43     0.63     1 .  4 O     0 .  3 3     3.06     3 .67     ij  .  3 3     2.5 '3     1 .  3: 6     O .  O  1     Li .  t. 2'. 

tt  tt  tt  tt  tt  #  tt  tt  tt  #  tt  tt  it  tt  tt  tt  tt  it  tf  tt  tf  it  it  tt  tt  li  ii  tt  It  tt  tt  tt  ft  it#  tl  tt  tt  #  tt  tt  tt  tf  tt  tt  tt  tt  tt  tt  ^^t  it  tt'  tt  tt  tt  tt  #  ;l^-#  tt  tt  tt  t,-  tf  tf  tt^  tt  #  tt  tt  il  it  tt  tF  ft  tt  tt  tt  tt  tf 
G  ( d B )  G - d  i,t  f  -T:  \-  >  1  o,  <  K  >  2  -  \  c  ■  H F  B I'i  e  r  r  d c. ' m  f  1 1  ■  1  -  i-:  2 )  b  t-  ,l  s h  1  e  f  f  i'i  P.  t R 
61.00     -0 .  04       99 .  3       327 .1     1  .  3209       1.31         0.151   dB     1 3 .13".     3 .  33  K       1 63 .  1 

2.30  =  H2  0.20  =  39  O.l^Jil  0 .  1  4 3'i 5  =  fi '  2 1  <  1  )  460  =  T-1.  9  '  3.9324  =  31 
0 .  75  =  Ii3     0 .  1 3  =  119     0  .  1  =  33     0 .  002i3Y:3-i  ( 2 1  3  '       1 5  =  T  :  1  j  1  1       l  .  3343  =  32 

*  H  R  E:  W  #1   =  0.1  4  2  76  +  -   .  3  3  3  3  ^  -  ■  C  3  31    =  0 .  1  4  3'  7       n  i-,  r   H  2  U       0.14].  9 

Kl         K2        K3        Kb        K3        K9        K        HFR--ff     R-eff     3'FU-'       .•:3i.':'K^3:  - 
0 .  9 3: 9  0.904    1.000   1 .  0 ij fj  kl .    3; -t   j  .  f i ij fi  0 .  3 7 ?     3.64  3^ 3       i3i .  9  3.       5  9 3  .  4     2 ,.  3i  4  '3  3  -  3 5 

■BITE  RLE  V         o  x  -v   n  f ;  , ,       '    , ,  i    ,    , ,  i  i  z  e  n  1 1 1 ,  „t-n       2  L  -  r    tt  1     R 13 !"      ^k,.      o  r :  f  [■lull 

0.1  Of'  kri  0.0344  3  <i2  0.0333'  3r  ::-h-  Fl  3.0;331  22'  1.33  1  3.t3.  3fi  -  !i:3.3  lt 
tttttttttitttttttttt  ii  ttttttFtttttttttttttff  tFtttf  itttttifi  Ft  It I  li  It  littthFittttiMtHti  ti  it'i  FttttiFti ;-;  ttFt:-;T'ttttti  ti  ttii  n  .i  ti  li  ii  itii  ■  !i  tittii  \r<  ■■. 
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REWORK  (cont) 


TFiPE  9        data  2        HBSlIi.41     REWORP:     <vS4S,dmG>  T4-F 12 <  B i -F 1 6  RENORK  15.01 

NESIH.QI     LOhLER     <5913'8003;  T2-Fy,  Dl-Fo?       K .  04-:  9082  >T2-4 .  l!  1 -4 

~SS~ 

f:in\  3 

PROG     276.5407  FT.   DETRICK  FiNT  #1 

THU:     1976  DEC  2       i   1976. 928 > 
7.319  GHz?   68.8  F^  PISH 


REL  riUnii  WATER  DEHS        CLOuri  COVER  NINL 

43.8    •.  4.5    ■9ri--"nt3         .74  8  nph 


FIT  Tn_     S  DFlTR 
U/KdB)  =<  41.1938  +-  8.  1258)  +  (  -8.14234  +-  8.82341)*C3C  L 

+  =  LIHEHR  COHTRIEUTIUH 


DEU  PT. 
30.  9  F 


10.  edt-?: 


;/T(dE 


48. 


+-  0.54  dB 


13.3  V; 


519  GHZ 


E-3      E-F       E-Y       E-Kl     E-K2     E-K3     E-K4     E-K5     E-Kb     E-K7  +E-KS  +E-K9  E-Tfl 

5.Sy';    w.ya    0i5y    ^.59    1.35    e.  a  9    0.0b    3.12    8,35    2.51    5.51    8.14  0 .  6y'i 

####»########################################################################### 

G<:dB>     G-diff  •  r<-K>"     Td<K:>      Y-fac    HPBHerr    dar-a  fit     c.<l-K2>  bright  effflREFl 

61.15      e;il     119.6     .727.1     1.2586       1.81  ^;     8.133  dB     13. 18"-;  13.11  K  174,8 

2.38=fl2  8.20=C9  0. 1=D1  0. 14345=N<21j  U  460=1 a?  9)  0.9248= J 1 
e.75=DS     0.1S=D9     g.l^CS     0.8O268=H<2i53;'       15=T^i,ll;'     1 . 88e8=C2 


*HPbW  #1  =  0.i4ii,'t  +-e.8O0yyb  Uol:  L  =  0.142.' 


ant  HPBW  ^  0.1419; 


Kl  K2  K3  Kb  KS  K9  K  flPR-eff  R-eff 
0.95i;0i904  1.000  1.008  8.932  8.992  8.795     8.6461  8.93 


;93.4  2.388E-e'; 


SITE  tLEV        oxy  attn  water  attn      zenith  attn      RE PR  #1     REFR  #2  ant-DlHM 

0^107  kfi      0^03443  cJE     8.0837  dB-^dens     Q.OSSl  dB         1.031         0.0130        68.8  ft 


20.0de?: 


jG.--T'  un 


8.42  dB 


E-S  E-F  E-V  E-Kl  E-K2  E-K3  E-K4  E-K5  E-K6  E-K7  +E-KS  +E-K9  E-Tfl 
5.80':"  0.00  -0.44'    1.30     1.35     O.OO     0.06     3.12     y .  35     2.4b     2.75     S.  04  8.68' 


G(dB>  G-diff  Tf:K> 
61.05      8.81  186.6" 


Ta^^; 
^27.  ] 


1.29o. 


HFBWerr 


-ua-.a  fit 


2.30=h2  0 

8.75=113     8.1S=Ii9  8.1=1 


8=C9    e.l=Iil    vi.  J '1341,^  n  ^'i  <  1    ^  46o=T  1 


*HPBN  #1   =  8.14276  +-0.088886  CSC  L  =  0.142 


^15  =  "^  "  1  .  1  r: 


c-a-K2>  br-isht  effHREfl 
13.  10';     6.74  K  170.2 

o .  96 1 1  =  J  l*-K3  ^ 


ont  HPBU 


8 .  1  4 1  .-^ 


Kl 
0.97  = 


Ki 


K6 


KS 


K9 


HPR-eff  R-etf. 


8 . y04  1 , 000  1 . Oyy  0 .965  8 . 993  8 . S4o     0 . 6459 


0.93 


SCFU;'  XiCK) 
598.4  2.455E-0^ 


IITb   ELEV         OXY  attn  uioter  uttn      zenith  ot^n      REFR  Itl     REFR  #2  nnt-riI9M 

[  8.1 37       J     8.03443  dB     0. 0'.V3;'  uC  -i?  uh-     O.OC'-l   .jn         1.831         8.0138         68.0  t  • 
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REWORK  (cont) 


30.0de-?:  •  G/TCdB  ••     =.  40,  yy:-:  +-  u.       dB        <      9.1  "■;)  7.319  GHZ 

E-S       E-F       E-V       E-Kl     E-t2     \r.--'.     !>K4  E-K^     E-K?   fE-Ky+E-K9  E-TFl 

5.80';    u.yy    0,4£    y.89    1.33    y.uy    0.0^    3.iii    y.3j    2.45    1.3?    0.02  O.Sy'; 

G(dB:.'  G--diff  KK.;'  To'/f  )  Y-fac  HPBll^rr  do.^o.  fit-  p-(l-K2)  bright  effHREfl 
61.02     -0.02     102.7       727.1     1.3039       1.31  ".     0.133  dB     13.  10'.     4.63  K  -169.0 

2.30  =  fl2  0.20  =  C9  0.  1^:111  0.  14345=M'-2i  J  1>  469=Ta>  9>  0.9732= J 1 
0.  75=riS     0.  1S  =  II9     0.  1=C3     0 .  0H268-H '  2 1  <  3 )       15=1:1)11)  1.0000=02 

*HPB1J  #1   ^  0.14276  +  -0. 000006  CSC  L  =  0.1427     (n,nt.  HPBW  =  0.1419) 

Kl         K2        K3        Kb        K3        KS        K        RPR-pt f     R-eff     3(FU)  Mi<K> 
0.933  0.904   1.000   1.000  0.976  3.99?  u.36b     0.6453       0.93      593. 4  2.506E-05 

SITE  ELEV        oxy  attn  i.iater  attn      zenith  atth      REFR  #1     REFR  #2     ant -D I  AM 

0.107  ki'i       0.03443  dB     0.0037  dB  -  dens     0.0331  dB         1,031         O.OISO        60. 0  ft 


40.0dt?:  G/T(dB)     -  40.972  +-  0.36  dB         (       3.7  ;•.)  7.319  GHZ 

E-S      E-F      E-Y      E-Kl     E-K2    E-K3     E-K4    E-K5    E-K6    E-K7  +E-K3  +E-K9  E-TR 
5 .  SO";     0  .  00     0.42     0 .  69     i .  35     O .  OO     0 .  06     3.12     0 .  35     2.45     1 ,  45     0 .  0 1     U .  60'; 

G dB )  G-diH  T<K)  Ta(K)  Y-fac  HF'BWe rr  da*. a  fit  1-K2)  bright  ef f fiREfl 
61.01     -0.03     100.9       727.1     1.3165       1.31  \     0.133  dB     13.10V     3.61  K  163.4 

2.30^h2  0.20  =  C9  0.1=Ii1  0  .  1  4345^H  2 1 5  1  )  460  =  Tvl)  9;'  0.9791=.J1 
0.  75=118     0.18  =  119     0,1 -C3     0 ,  yy260  =  hh; 21 J  3)       15=T<  1  >  1 1  >  1.0009=02 

*HPEi'J  #1  =  0,14276  +-0.080006  CSC  L  =  0.1427     (ant  HPBW  =  0.1419) 

Kl         K2        K3        K6        K3        K9        K        FiPR-c  ff     R-tff     S<FU)  Ki<K) 
0.936  0.904  1.000  1,000  y,9Sl  0.999  0.37';i    0.6453      0.93      593.4  2.531E-05 

SITE  ELEV        oxy  attn  water  attn      zenith  attn      REFR  #1     REFR  #2  ant-DIflfl 

0.107  ki'i      0.03443  dB     0.0037  dB -dens     0.0381  dB        1.031        8.0130        60,0  ft 


50.0deg:  G/T(dB)     =  41.007  +-  0.35  dB        <      3.4  7.319  GH2 


E-3  E-F  E-Y  E: 
5 .  3  0 ".     0 .  0  0  0.41 


-i;i  E-K2  E-K3  E-K4  E-K5  E-K6  E-K7  +E-K3  +E-K9  E-TR 
53     1,35     0.00     0.06     3.12     0.35     2.44     1.22     O.Ol  0.60? 


G  ( d  B )  G  -  d  i  f  f  T ' :  K )  T  0.  c  I- ;. )  '{ -  f  a  c  H  P  B  W  e  r  r  d  a  t  a  fit.  c  1  -  K  2 )  bright  6-  f  f  H  R  E  fl 
61.00     -0.04       99.3       727.1     1.3209       1.31         0.133  dB     13.10';     3.03  K  163.1 

2.30"H2  0.20  =  09  O.l-^IH  0 .  1  4345 -N  v  2  1  ?  1  )  460  =  T':iii  9)  3.9S24=J1 
0.75=D3     0.18  =  Ii9     O.l-OS     0 .  00260-N ( 2 1 »  3 )       15-T(1>11)  1.0000=02 

*HPBIJ  #1   -  0.14276  +-0.000003  030  L  =  0.1427     (ant  HFEU  -  0.1419) 

Kl         K2        K3        K6        K8        K9        K        PPR-.i-ff     R-eff     S'TU)  Xi<K> 
0.93?  0.904   1.000   1,000  0.93'1   1 ,  OOO  0.379     0.6453      0.93      593.4  2.S45E-05 

SITE  ELEV        cxy  attn  uater  ■"•ttn      zenith  attn      REFR  ttl     REFR  #2  ant-DIRN 

0.  107  k.'i  0.03443  dp  H.0O:7  dB/deri:  O.USSi  dB  1.031  0. 0130  60.0  ft 
#  tt  tt  #  #  #  tt  tt  #  tt  #  tt  #  tf  #  #  tt   »  h  li  If  H  li  +1  tt  It  W ;  I  It  #  It  It  tt  tf  V,  ti  if  tl  tt  II II  it  ft  It  it  #  It  -t   It  It  t!  #  #  it  It  1^  #  It  tt  It  it-  #  »  #  #  H  tilt  #  I :  H-  tl  tt  tt  #  tt  it 
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REWORK  (cont) 


TAPE  9        do. to.  2        NBSlIi.4l     REi-JORK     ■  9848»  O00t.->  T4-F12j  IH-Flt*  REWORK  15.61 

HBSlH.01     LOhDER     ;9'M3iifiye3  -  T2-Fy  ^  Iil-Fy>       X .  y4  . oyy2 >T2-4 » Ii  1 -4 

—  (5  7  — 

RUH  3. 

PROG     27o.  54:17  FT.   DETRICK  RNT  #1 

TrilJ:  1;EC  2       (  1576.923-' 

-  7.319  GHz'   60. U  Ft  LISH 

TEMP  DEW  FT.     ^     REL  HUrlD  WRTER  DEHS        CLOUD  COVER  WIND 

53.0  F  30.9  F  4  3.0  ".  4.5        rit3  74  9  nph 

FIT  TO      S  DRTfl 
G/Tfl(dB>  =(  32.3407  +-  0.1315)  +  (     0.03342  +-  0 . 02446 *CSC  L 

i-  =  LIHERR  CONTRIBUTION 

la.Odt?:  G.-'-Tfl<dB'.'  =  32.533  +-  0.55  dB         (     13.4  7.319  GHZ 

E-S      E-F      E-Y      E-Kl     E-K2     E-K3     E-K4     E-K5     E-K6     E-K7  +E-KS  +E-K9  E-TR 
5 . 80";     6 . 00     0.50     2.59     1  .  35     O .  OO     0 . 06     3 . 26     0.35     2.51     5,51     0.14     0 . 60'-; 

#######tt############fr######tt##############################4f  ##################### 
G<dB.>  G-diff  T  <  K  >  TaOO  Y-fo.c  HP  BW  err  do.- a  fit  c  <  1-K2>  bright  ef  f  fiREfl 
61,15      0.11     119,6       727.1     1 , 25o6       1.81         0.139  dB     13.  lO'-;  13.11  K  174,0 

2.30=R2  0.26=C9  0,1=B1  0. 14345=N<21» 1>  46e=T<l »  9)  ©.9248= J 1 
0,75=DS     0.13=D9     0.  1=C3     0,  G0260=N':  21  ?  3)       15=T<1<11::'  1.0000=02 

*HPBW  #1  =  0.14276  +-0.000096  CSC  L  =  0.1427     (ant  HPBW  =  9. -1419) 

Kl         K2        K3        K6        C3        K9        K        RPR-ef f     R-eff     3(FU>  Xi(K) 
0.951  0.904  1.000  1=000  0.333  0.592  0,795     0.6461       0.93       593.4  2.300E-y5 

3ITE  ELEV        oxy  nttn  woter  ottn      zenith  ottn      REFR  #1     REFR  #2  ant-DIRM 

0.107  kn       0.03443  dB   -0.0037  dB-den;.     0.0331  dB         1.031         0.0130        60.0  ft 


28.  Ode?:  G.'TH^dB)  =  32.433  +-  0.42  dB         (     10.2  'O  7.319  GHZ 

E-S      E-F      E-Y      E-Kl     E-k2     E-K3     E-K4     E-K5     E-KS     E-K7  +E-KS  +E-K9  E-TR 
5.30'-;:     0.00     0.44     1,30.    1.35     0.00     0,06     3.26     0.35     2.46     2.75     0.04  0.605. 

#############s####tt#########.#####4t#.#######tt###ft##4####ft###±t#####tt#tt#-#.S4f  ####### 
G'-dB)     L,-ditt     T(K)    -    To-(K)       Y-fac     HPBWerr     do.to.  fit     c(l-K2>  bright  effflREfl 
61.05       0.01     106.6      727.1-    1.2936       1.31         0.139  dB     13.10";     6.74  K  170.2 

2.  30=h2  0 .  20=09  0.  1=D1  0.  14345=N'- 21  <  1  >  460=T<1<  9)  0.9611  =  31 
0.75=D8     0.13=D9     O.l-CS     0 . 00260- 1  i  2 i . 3 ^       i5=T.ijll>  1.0030-02 

+  HPBW  #1  =  0.14276  +-O.O0O0O6  C3C  L  =  0.1427     io.uX  HREN  =  0.1419) 

Kl         R2        K3        Kb.    ,   KS_      R9        K        flPR-eff     R-ett     S<FU)  Xi(K) 
0.975  0.904  1.000  1.000  0.565  0.998  0.848     0.6459      0.93      598.4  2.455E-05 

SITE  ELEV        ovy  at  t ..niter  aMr,      zenith  o,*-n      REFR  tt  1     REFR  #2  ont-ITRM 
0.107  k  fi       0.03443  dO     0. 01!       dB-  dens     0.0331   dO         1.031         0. 0130         60.0  ft 
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REWORK  (cont) 


jti.Udt'?:  ,  G/Tii':  dE'       J./,.  ■fMr:  +-  0.33  ciB         (       9.2  ".)  7.319  lHl:: 

E-S       E-F       E--V       E  Kl     E-f-2     f,  -i  -:       -  K4     E-F5     E-Kb     E-K7   fE-K3  +E-K9  E-Tfl 

J .  So".     U .  y  ti     0  ,  43     u ,  o9     J,  „  35     U  .  mU     i:J .  03     3  .36     m  .  35     2 .  '15     1  .  8  ,■"     U .  02     0  .  b0". 

^:  #  #  |;t  #  #  #  #  #  ij:  .|:f     #  #  it  fl:  #  #  #  #     tt  it  it  #  i  ff  I  t  1t  il  ^IT  it  it  »  S  #  it  #  #  #  #  #  tt  ft  #  #  1?  #  #  4  ft  Vi  tt  4^  ?|-  #  ft  tt  ft  #  ft  ft     ft  fl^  ft  ft  #  ft  ft  it  #  ft  I  f  ft  ft  ft  ft^  ft  # 

i:  ( d  B )  G -  d  i  f  t  T  ' :  f ::  >  T  ii  ' .  \-'  >  V  -  *  n,  i:;.  I-I P  E;  e  i-  r  d  o  ^  a  f  1 1,  z.  a  -  K:  2  )  ti  r  i  5  t'l  t.  f  i  Fi  F:  E  H 
bl.W2     -0.02     102.7       727.1     1.30C.9       i.31  ":,     0.i39  dB     13.  jM"-.     4.63  K    .  169.0 

2 .  3  0 = Fl  2  0 .  2  0  ■=  r:  9  0.1  =  I)  1  iZi  „  :!  4. . j  .t  5  =  I-I '  3;  1  <  1  4  6  3  =  T  a  i  9 )  0.97  3: 2  ^  J 1 
0 .  7  5 = n  i3     0 .  1  ;3  ^  1)  3     0  .  l  ^-  r.  3     I'J  -  Id  Id  2  6  O  H  ^  3:  [  ^  3: )       1 5  =  T  ;  1 1.  1 1       1 .  0  0  0  0  - 13  2 

+  H  F''  B  t'-i  ft  1   -  0.14  2  ?■  5  +  ■-  Id  .  (J  0  0  0  0  b  i3  S  C  L   =  0.1427     ( a  n  t  H  F'  B  W  =■  0 .  1419  > 

Kl         K2        l<3        Kb        KB        K9        K        flPR-eff     R-eff     Sa-U)  Xi(K> 
0 .  '9  3  3i  0.904   1 ,  0  Pi  0   i  .  id  0  i;?  f  i .  3  7  b  3  .  3  9  9  0.366     0.645  3       0 .  9 13       593.4     2.5  0  6  E  --  0  5 

3i  I  T  E  E  L  E  V        r. : <  v  o  t  t  i,i  n.  t,  ^  r  o.  X- 1  i-i       z  e  n  i  t  h  a  t  t.  n       F;  E  F     #1     R  EI  F  R  ft  2     o,  n  t  -  D  1 13  H 

0.107  I  0  .  0  3i  4  4  3  d  B  Pi  .  Ci  d  3  7'  ci  B  ■ '  d  n  s  0.0  3i  SI  d  B  1.031  3.01 2  0  60.  0  i' t- 
ft  ft  ft  ft  ft  ft  ft  #  ft  ft  ft  ft  ft  ft  it  ft  i\-  ft  ft  #  S  ft  tt  ft:  11  ^  %  ft:  ft:  ft  ft'  ■!!  it  il  il  ft  ft  ft  tf  ii  #  #  #  #  #  ft  «  ft  ft  ft  ft  ft  ft  #  ft  #  #  ft  tf  #  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  ft  #  ft  ft 


40.0de3:        ,                  'G/TFl(dB)  =  32,393  +-  0.36  dB         (  3.8  '<.')    .       7.319  GHZ 

E-S       E-F       E-Y       E-Kl     E--K2     E-KS    E-K4     E-K5     E-Kb  E-K7  +E-KS  +E-K9  E-Tfl 

5 .  i3  0 0.00     t;i .  4'  2     0,6  9     1 ,  3  5     id  ,  P  0     3.06     3.26     0  .  3i  5  2.45     1.45     0,01     0 .  6  0  "■, 

ft  ft  ft  #  ft  #  tl  ft  ft  #  ft:  ft  ft  t,  :!:|  ft  :»  ft  ft  ft  #  ft  ft:  ft  ft:  ft:  :i:i:  #  ft  ^  #  #  Xf  9  #  :i:i:  #  #  :F^  ft  ft  ft  tf  :|:|  ft  #  #  ft  ft  4  It  ft  ft  :ff  ft  ft  rt  ft  :tf  ft  ft  ft  ft  ft  :tt  ft  ft  ft  ft  ft  ft  ft  ft  ft:  ft  ft  ft  ft  ft  ft 

G  ( d  B )     1 J  - 1 J  1  f  f     T  ■.:  I : )       J  .1.  l-  ■. )       ■  r'  - 1  G,  I :     H  F'  E  N  €  r  r  -     d  u  .  o   i-  1 1  c  ■ .  1  -  B.  2 )   b  r  i  ?  I 'i  t     e  f  f  h  R  £  Fl 

6 1:01     -0.03     100.9       727.1     1,3165       1.81   ".     0.i39  dB  13.10".     3.61  K  163.4 

2 .  3 0  =  fl 2     0.20=:: C 9     0  .  1 ::::: Ii  1     0 .  1  4 :3 4' 5  =  I' -I  P 2 1  ?  1 )     4CQ=1  \  I  f   9  0  .  9 7 pi  1  =  J 1 

0,75=:ri3     0.18  =  1)9     0:,  1-P3     0 .  i;i02PO:::4P' 2 1  ?  3  >       15-1  :i^  1  1  )  1.0000:^02 


*  Fi  F'  B  I'i  ft  1   :=^  8  .  1  4'  2  ?'  6  ■+  0  „  0  0  0  0  0  6  C  3  C  L  =  0.1427     C  .i  r,  t  H  F  B  W  =  0.1419 ) 

Kl         K2         K3         Kb         KB         K9         K         flPR-et  f     R-eff     S'TU::  KiCK) 
0  ,  '9  i5  6  Pi  .  9  0  4   1  ,  0  P^O   1  .  id  0  Bi  B  .  9  8  1  0 ,  9  9  9  0.375     0.64  pi  i3       3 .  '3 :3       5i  9  8 .4     2 .  5  3i  1 E  -  0  5 

■3  I  T  E  E  L  E  ij  X  y  a  1 1  n  i  ,i :  r'  o  r  t  n       z  e  n  1 1.  Fi  o.  t. :  :-,       R  E  F  F:  ft  1     R  E  F  R  #  2.     a  n  t  -  D  I  fi  M 

0,107  k  r.       0 .  pi 3i 4 4 3  id B     B .  B B  ":■  7'  di'  d r. -i     B  .  B 2 B  I   dB         1.031         6.  9130        60.0  f  t 

tt  #  #  :|:t  #  #  ft  ft  ft  ft  :ii:  tl  ft  tt     #     ft     tt  :ff     ^  Xt  #  ^At  4  ft  1:|4|'  :|:|  if  Ii  #  ft:     S  ft     ft  ft  ft  ft  ft  ft  if  ft  i+     i±  ft     ft  ft  #  ft  ft  ft  #  ft  ft  tf  :|?  ft:  ft  tf  tt  ^  #  ft  #  tt  4  #  ft:  ^  #  ft:  ft 


50.0  d  6  ^1 :  G  T  H  (  d  £i )   ■=  2  2  .  3  3  4  +  -  0.3  5  d  Pi         (       8 .  5  '\ ')  7 .  2 1  9  G IH  Z 

E-S       E-F       E-y       E-Kl     E-4<2     L-K3     E- K4     E-K5     E-K6     E-K7  +E~KS  +E-K9  E-Tfl 
B .  i3  Pi  ■■.     Fl .  0  0     0  .  4  1     0  .  B  2     1  .  3i  5     B  .  00     0 .06     :3 .  2  6     0.35     2.44     1 ,  2  2     0.81     0  ,  2.  B  v 

tt  #  tt  tt     #  #  #  ft  ti:  #  tt  tt  tl:  ft  tt  tt  ft  tt  tt  t^  tt  tt  tt  :|:|:  tt  tt  :|:|:  tf  :|:i:  ft  :|t  It  tt  ft  ft  it  tt  It  tt  tt  tt  tt  :|t  tt  tt  #  tt  ft  ft  tt  tt  \'i  ft  tt  tt  ft  #  i:t  ft  ft  tt  tt  tt  ft  :tt  #  It  ft  tt  tt  tt  tt  ft  tt  tt  tt  tt  tt  tt 

G  ( d Ei )  G  -  d  1  + 1  T  B: )  T  o  !■ :  ':<  V  -  +  c. c  H P  B 14 e  r  r  da-  o.  f  i  i  c  1-  B  2 )  Fi  r  i  \  i t  t  i-  !"i F? E H 
61.00     -0.04       99.8       727.1     1.3209       1.81  ',     0.139  dB     13,  lO":     3,03  K  163.1 


2 .  3  0  =  Fi  2  0 ,  2  B B  9  0.1  ■::::  Ji  ]  0 .  1  4  ■ ' 5 :' '  t]  2 1  '  1 )  4  F,  0  T  ■  1  <  9  '  0 .  9  824=  J 1 
0 .  75-118     0 .  1  3-ri9     0  .  ]      3     0  .  00260  :::  !1 2 ;[  ,  3  >       1  5-T  :  1  <  1  1       1 ,  0300  =  32 


*  H F'  E:  B  tt  1   =  0.14  2  7 6   i  0 .  0  id (i id 0 B  B 2 B  L  ==  0.1427     (  0  n t.   i  t F' B  B  =  0.141 9  )  . 

y.  1      f:::  3;      b  j      \ :  c      y.  b      v        k      a  f-  b  -  1-  f    f  :  -  €■  f  t    3:  c  f'  u  :>      v.  1  ■  k  > 

0  .  9  8  9  0.904   1 .  yuO   i  .  i  i  u  o  F J .  •> :  J  4   I .  '-■  ■.:  B  u .  3  7  9     3 .  3  4  5  3       Fi ,  9  ■?      5  9  3 .  4     2 .  5  4  b  C  ~  0  5 

SITE   ELEV         o.\y   d  t  T  n  mo     f  -itfn       ZHniM-i  iVi-- n       f^'EFF   tti,     REFP  ft  2     dni   PI  till 

0.1  U7  III       0.03443  dP     i:.id:j';F'    iF'  i;.!  ;  I  :     3.0331   ■P :         i  .  3   i.         id.Ul3P         ■■-O.P  it 

tl  it     it  ti  tt  tl  tt  tt  tl  it  ft  :i:|:  tt  :it  tt  4  tt  tt  tt  ^  it  ti  Tl  H  ii  il  ii  ii  H  4  ti  ii  i:  „  tl  ll  S  If     tt  it'  tl  It  it:  ft  i:  tt  ii      U  it  li  ii  tl  H  'i  -Pr  tt  i:i  it  ti  tl'  1:1  ti-  It  it  ii      it  tt  It  tt  ft  il  ii'  ii-  t|:  tt 
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6.5.9     Documentation  of  Final  Results 

The  last  step  in  the  measurement  procedure  is  to  enter  the  results  from  the 
last  data  rework  into  the  SITE  PREP  program,  which  lists  all  the  program  assump- 
tions and  measurement  errors  in  a  more  explicit  form.     To  better  understand  this 
procedure,  an  annotated  printout  of  the  important  entrees  is  given  in  the  follow- 
ing paragraph.     For  this  illustration,  the  final  rework  is  assumed  to  be  the  one 
used  in  the  annotated  printout  for  the  third  level  rework  in  the  immediately- 
preceding  section.     The  information  used  from  this  rework  is  encircled  on  the 
G/T  error  table  printout,  and  corresponding  use  of  this  information  is  encircled 
in  the  data  entry  portion  on  the  following  annotation.     The  SITE  PREP  error 
table  printout  contains  the  same  information  as  the  REWORK  error  table  printout. 
To  facilitate  the  comparison,   some  of  the  information  on  the  following  SITE  PREP 
printout  has  the  corresponding  REWORK  table  printed  next  to  it. 
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FINAL  RESULTS 


CHflNGE  PUri-DflTE/S  I  TE;  1  ^^Hi    :   m         ■■  1 

RUN  HUMBEP'    =HC>:  3 

VEhR'::   -NC  ^HUi-i:  1976''' 

NOHTH':   ^NCniON:  liEC" 

IiflV  OF  MOMTH''    •---NO Null;  j 

DhY  of  WEEK';,   ^NC^NOW:    1  NM> 

PRO  J  #<  =Ni:.>HOW:   E?b .  j4h?'-' 

L  0  C  H  T  1 0  N  =:     hi  C   N  0 1'J  ■   F  T     ]j  i: :  T  i-;  i :  ■  ^  ■   f]  \  \  ]    #  i 

SITE:w.   LGNG^.  =HC:-: 

site:  H.  LRT';-   -NC;. :  Jj\__^___ 

S I  T  E :  H  L  T  ( I N  <   =  H  C  >  \       lu,      ]  ■ 

NEN  F  BN-ELEV/RNT  rrifr-__^____   i--   ■■  - 
CENTER  FREQ(GHZ)';   =Ni  .|  •  ■.      •  ■ 

E  F'  F:  I N  F  R  E  Q  ( ■■.  '>  (   =  N  f;   :   ^-m  ' 

E; H \\ n W I II T H  M H Z )     =Hr   i      ,        ■  ■ 
ELEVdiEG  :' ■    =NC:'t    ^'-^  "|  ■■ 
RNT  DIhM  'TT  'v   =M!        .-.n  o 


1=-HPR  EFF.2  =  HNT  HPRWn:.^:r 
RNT  HPBWaiEGX  ^HC 
HPBW  ERR  UG  ,  ■.■ 


^N 


HNT  PT  ERR:  I^DEGj  £==".H|-'r-r 
DEG<   =Nr:>s   0,015  ? 


„.,|fr;:W' 


r 


RNT  PT  ERR 
dB 


■■  f  r  e  s-  P  o  n  d  i.  1  o  Q  ■  T  d  o,  t  o  f 


■SQR(ftpTS 


0 .  129 7 8 7  J 0 1 


0.  120737507  DB ;  O^^TR'f  RGM  lr^ 
HEG':;   =HC>:   0.015       ?  =  01i:; 


RNT  Pi  ERk  correspond--  t  G  T  ,-irr 
dB 


1 1 


1  S  y  Q  R  #  P  T  S     o  +'  0 ,  1 :3  6  9  5  7 1  3  6 


0.13695  7  1  3  6  H  B  :  0  T  F:  \ '  H  f\  IN'  N  C  :  1 
DEG'    =NC,.':   O.OIE  ?.0iS8 


':'U 


RNT  PT  ERR  correspond-  tn 
dB 


■  1 S  ■  S  Q  R  (  #  P  T  S     o  f   0.1  3  3  6  4  8  3  5  9 


0  .  1 3: 3  6  4  8  8  59  Ii  B  :  0  =  T"  F'  'i '  R  G  Fi !  N  ■ 
IiEG(   =HC::':    0.0158  '"■=01573 


RNT  PT  ERR  c  o  r  r  csponn t 
dB 


0..  1329 91832  D B :  0  =  T P T  Fi 8 R i -i ■  -^n i i' 
Ci-IRNGE:  1=T'  K  ;> "    2=-7  T   '-  ^  i  0 

G.-  T(riB  '^(  ^NC;' :  |4r'.  ;  ,        ],  u  i 
CHRHGE:  1=-G.-'TR<    j-iri'-.  ■  m 

R  ri  n  E  D  W  0 1 3.  E  f  f::  )  (   =  N  C  ■  '  \  \ 
R  N  B I E  N  T  T  E  r"!  P F   (   =  N  P  -     '  ' 
DEW  PT  TEMPCP;-.   =NC)^  |  ■ 
ENTER  8UN.T10nN  RLrllNll:-   I'.i'ir  ■:■/[■'-■:■ 
PRT  SITE  8TRP  DRTR'  O-THi  :^     -Wr  < :  1 
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FINAL  RESULTS  (cont) 


NBSlB.e?    SITE  PREP  <rii 


fiMT 


r  DISH 


32,43  dP- 


G 

61.04 


ZFF 


f 

kHS  EFF 


COHvL  HP3 
a.  143S  ds- 


pHRfiriETER 


T 

Ki 


K3 
K9 


K2 


K3 

K4 
K5 

Kb 
K7 


Ta 


=319  ^-  e.ai 

r?,4    ^-  5.88 


59.  ■? 


-REQUEHCr  <GHz) 
FLUX  fF.U.  =  19t':-26 

Tiont)  =        31.2  K 

Ki       =  2.45SE-g5  -XJ^O 
v-FRCTOR 

¥<dB>  =     1. 119  dE 
RTM  RBSORPTICH  FHCTOR  fUD.?; 

oxy-3e-ri  at.t.n=  a.ti:j14  cr  o^'^Attn 

water  attn  =  a.@037  dB  ^  i^^  fO  «/*tffr  «.tt^ 

watfc-r  dsn£=     4.5  - 

Qtft  bright  =     i^;,?   V  >r;9ht 

site  alt  pi 

DlFpSS^a./sUi 
REFRHC-t5<,^.  18*t  IxKy-i 
1st  cTrAt!    1.6393  Rff^A/ 
2nd  const:   6.8138^5/^  *i 
STAR  SjjKcO-Kd^-^- 

HPEU  (^-1:  .  ■  :  I  HPBWerr 

BNDWD  EFFECU.  t-aCTOK  /y  :  .  888 

bandwidth  =  5.5  MH- 
BIFF  SYSTEM  TEHP  1.089  ^- 

HNT  POINTf+-  0.81153  ri.-  -i  '       -  _  aftO 


-  8.18^^8 
+-     1.30  ^ 


KS  8. 965 
^7  J.  998 


2.75 
8.04  % 


yhy5  +-     1.34  ^ 


ii.r  G-  T  data  tii-  = 

HHT  POLfiRIZfiTiuH  FfiC^  J(4^008 

SYSTEN  RESPOHCE  FhCY  i?08S  ^- 

instr  pwr  rtsp  'J=  2Mi8'..'C7 

Y/'tY-l>=  4.482 

gauss  curve  fit(+-  2.38y';<»^ 
fiDDEB  NOISE  -.i  fc^^K) 


NRfH 

effAf{BA 


EftR  TO  G.'T 
—  8.88 


8.  44 
1.30 


+- 
+- 


2.75 
8.84 


1=,34 


£-5 


8.83  ^ 

+- 

y .  yo 

0.86  Z 
3.11  ^ 

+  - 

0.  86 
3.  1 1 

%  z-K* 

8.35  Z 
2.46  :^ 

+  - 

8.35 
2.46 

- 

9.68 

8 ,  6  ■ 

TOTHL  ERROR?  «iuad  sun  +  .j.t 


"  f  r  e  r  f 
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-    ,  .  7.     COMPUTER  PROGRAM  CONSTANTS 

The  meanings  of  the  computer  program  constants  are  listed  in  this  section. 
Some  of  the  program  constants  are  used  more  than  once  so  that  the  appropriate 
meaning  must  be  deduced  from  the  context  of  the  program.     For  convenience,  the 
simple  program  variables  are  listed  first,   the  matrix  variables  listed  next,  and 
the  defined  functions,  key  functions,   flags,  and  multiplex  functions  (FNX  func- 
tions) are  listed  last.     Each  of  the  lists  are  printed  twice,  once  in  alphabet- 
ical order  by  the  variable  name,  and  once  in  alphabetical  order  by  meaning.  The 
use  of  these  definition  lists  with  the  use  of  the  cross  reference  lists  included 
at  the  end  of  the  program  listings  makes  it  possible  to  rapidly  locate  a  specif- 
ic calculation  within  a  program. 

As  a  courtesy,  the  program  and  file  tapes  to  generate  these  lists  have  been 
included  in  the  software  library  of  the  ETMS .     To  use  the  program,  tape  6 
is  inserted  into  the  cassette  unit,  LOAD  10,   then  RUN.     Then  the  appropriate 
tape  needs  to  be  inserted  into  the  cassette  unit  (tape  6  for  the  variables 
list,  tape  7  for  the  matrix  list,  or  tape  8  for  the  function,  key,  flag  list). 
The  computer  generated  messages  will  guide  one  through  the  required  steps. 
To  print  out  a  program  constants  listing,  at  the  TRAP  select  5  =  LIST.  For 
the  question  PRT:  X,A,B,C,D  (0  =  NO,   1  =  YES,  9  =  ALL),  5  keyboard  entries 
are  required  before  the  sort  and  list  are  initiated. 
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7.1    VARIABLES  LIST  ALPHABETICAL  BY  VARIABLE 


wbS2.00   <KfcS   9915,    00G7>     T6    &  D5-i-10 

REVISION  t 

-1- 


VAFcIABLES  LIST     #  9 
for     NBSIX.02,   N3S1A.01,   NaSlB.02,   NBSIC.OI,  NESlD.02 


1 

A 

2 

A$  ,B$ 

3 

A  { N7  ) 

4 

AO 

5 

Al 

A2 

7 

A3 

a 

A. 4  fA5  ,A6 

9 

Ab 

10 

E 

11 

B  ( I  ,  J  ) 

12 

BO 

13 

El 

14 

tl 

15 

c  2  , 5  3 

16 

b4 

17 

B  5 

io 

B  5 

19 

bS 

20 

b6 

21 

b7  ,b8 

22 

bS 

23 

b  :^ 

24 

c 

25 

C(I  ,J) 

2G 

CO 

27 

CI 

28 

CI 

2y 

C2 

30 

C2 

31 

C3 

32 

C4  ,C5 

33 

C6 

34 

C7 

35 

C8 

36 

CB 

37 

C9 

3o 

C9 

39 

u 

40 

D$ 

4  1 

b(T6,I) 

42 

DC 

AZIUMTH(deg)    OR  DUMMY 
DuW-lY 

SET  DATA:    SEE  MATRIX  LIST 

RCV;ORK  *  ' 
fiLTER  S 

GAbSS  CoRVE   FIT  ERROR, %  CT 

ATTENuATIOi,  OF  STD  ATTN    {abS>l   ,   NOT  dB), RELATED  TO  N(13,10) 
SYST  CG:jSTS:FKGM  OSES  N  ( 1 ,  4  )  ,Ln  ( 1  ,  5 )  ,N  ( 1 , 6 ) 
RAIIO  ?1  aGc/#2  add  uses  N(1S,5  cr  10) 

KFBvNtKirin  cf   ere)  ,AS  MEASUKED-NO  KANLA  CCRKECTION' 

du:-:ky  matrix 

HPbV*  {iT.inutes)   with  Kanda  correcticn 
DECL  OFFSET  (deg) 

CODE  FOR  SATELLITE  CARRIER  HEAS : 0 =SKY , 1=-F , 2 =RCR  %  F , 3=+F , 4 =GTHER 
A.NTEi-.;NA  AFERTuRE  EFFICEinCY,   ANT  RADIATIGlm  EtrlCIENCY 

ATKOSPKLRIC  BRIGHTNESS   TEMPERATURE,  K 
TEMFERATLRE (F) 
T/TA  ZEMTH 

DLW  POINT  (F) 
T/TA     CSC  COEFF 

G/Ta(cB)    ZEi'ilTK  COEFF, CSC  COEFF 

F(OkT)  ,iP.K=(F5+F8)/2:    in  C/kT  yEAS 
ANTENNA  EFFECTIVE  AREA 
DATE,  DECI.VAL 

G(I,J)    INVERSE     OR  bUhNY 
SITE   ELEV  (Kl?) 
C"2/ (8*PI*K*F*2) 

SPACE  LOSS 

Er.i  OR  enhancciT.ent  factor  for     NEF,NUF  ccrr^pared  to  G/T 
FLAT-5db  ATTN   IN  NOISE  ADD  PKR  KEAS : 0 =N0 , i=YES 

FLAG-imOISE  ADD:    0  =  #1&=  2  ,  1=  =  1  ,  2=?2 
SITE:  V,  .LONG   (deg),  N.  EAT  (deg) 
GHA  TO  ARIES   Is  0  GKT  (hrs) 

G  via  HPbW  -  G  via  G/T a,  d3 
Y-FACTOR  ERR,% 
FILTER  EREQ  (MHz) 

li.STRLf-'.ENTAL   POWER  RESFOMCE  ERR,% 
FILTER   upJiiLFASS  (MHz) 
ANTENNA  DIA^^ETER  (FT) 

REMARKS 

DATA  MATRIX:  SEE  kATRIX  LIST 
SKY   t-ACKGROuND  ERR,  0.9/F''2 
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NBS2.00   <NbS   9915,    0007>     T6   &  D5-F10 

REVISION   «  9 

-2- 


vAKIABLLS  LIST     #  9 
tor     r.bSlX.02,    NESlA.Ol,   NBSlb.U2,   NBSIC.OI,  NBSlD.02 


43 

Dl 

STAR  SliAPL  ERR,% 

4^, 

D2  . 

ilPbW   UNCERTAINTY,  % 

4  5 

D3 

Annrij  mjisf  frror  % 

46 

B5   ,  ; 

ANlLI>iiMA  PCIImTING  ERROR  (deg) 

4  '/ 

L;B 

LIFE'USIVE  ATTEUUATION  ERR,% 

4£ 

L)9 

FrFRAri'TVF    ATTFNIlATinrJ    HRROR  %. 

49 

E 

HOUR  Ai.GLE  (deg) 

bO 

E 

L1RP*G/Ta 

^  i- 

r 

52 

EO 

G/T  ERR-FREQ 

53 

LO 

ATTEl^LATI0l4(dB)    OF  PROGRAM  ATTENUATOR,   TEMPORARY  VALUE 

-J  M 

55 

LI 

YEAR 

56 

LI 

G/T   ERR-ATKOSPIiERlC  ABSORPTION 

~j  1 

r  1 

5b 

E2 

ATTUuATION  (dB)    OF  PROCRAI"!  ATTENUATOR 

59 

L2 

G/T   LRR-STAR  SHAPE 

f.  1 1 

vi\J    i  n  f     UA I 

0  I 

L3 

G/T  LI.r-EANDVilLTH 

6^ 

L3 

'ilML  DELAY  TO  SCI   ANTENNA  (SEC) 

63 

L3 

LIRP  :PVvR+noise  aad  #1  (mK) 

64 

C4 

G/T  i:.Pi.-Dit  1  1. 1  L,j'i lA).  Li.;y  'i'i:i".p 

65 

L4 

TRANSMITTER  POWER,  KATTS 

66 

E4 

LIRP  :PV;R  +  ncise  add  #2  (mK) 

67 

L5 

TlML/.''.EASURLMEtMT  (hrs) 

68 

E5 

G/T   ERR-ANTENNA  POINTING 

69 

E5 

YEARS    (JULIAN)    SINCE   1900  /4 

70 

E5 

LIRP  :PhR+noise  add  #1  &  #2  (irW) 

71 

L6 

YEARS   SINCE  1977 

72 

E6 

G/T    ERR-ANT  POLARIZATION 

73 

E6 

ATTUNATION (cB) ,   MANUAL  ATTENUATOR 

74 

L6 

KiEASUKEMENT  #   OF   t  IT  GAUSSlAi^  CURVE  TO  DRIFT  CURVE 

75 

E7 

G/T   ERR-SYSTEM  RLSPONCE 

76 

L7 

S'iANT  lvAiMGL,10''6  Km 

77 

E7 

HPol-;   t  IT  bY  GAUSSIAN  CURVE  TO  DRIFT  CURVE 

76 

E8 

Tir';L(  l.rs)/ (ARC  deg) 

79 

E8 

G/T   ERk-ATMOSPHLRIC  DIFFUSION 

E9 

GriA  To  ARIES (deg) 
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for     r.BSlX.Oz,    N3S1A.01,   .-iDSlb,02,   NBSlCOl,  N3S1D.02 

81  E9  G/T  ERR-ATKC SPHERIC  KEFRACION 

b2  E9  PWR(irih)    Ou  SAT  SIGl-AL 

83  F  FREC  OF  MEASUREMEisT  ( GH  Z) 

84  F  RLCEIVCF.  FBEQ{GHZ) 

bb  F(i)  c"u:;yY  "j^irix 

C6  io  FRE^  LRR,% 

87  FC  vALoE  OF  C2   lit  FNW 

88  Fl  FLAG:    0 =STAR, 1=SATELLITE 

89  rl  Si? ACL  LOSS:    in  C/icT  MEAS 

9U  tl  FLAG-GRAFn:0=wO,l=DATA,2=&FIT, 3=FIT,4=£XIT 

91  Fl  FLAG:    1=SU£R0UTIKE  LOADED 

92  H  FLAG:Q  =  rRT  PKR  &  VOLTS,   2=GRAPH  PV:R  FJ^TIO     (in  E) 

93  F2  tLAG-rFT:tj=ALL,l=rRGG  DATA ,  2=IiNPUT  ASSUMPS ,  3=G/T  EKR,4=ANT  ELEV  V£  GMT 

94  t2  P/Pc  for  LOWER  FF^Q  CWT:      in  C/kT  reas 

95  t2  FLAG:    0  =l\"OR.'.AL ,  1=E IF F   PLOT  DATA,2=i:iFF   PLOT  CF   5  CUTS 

96  F2  FLAG:C=CSC  fit,    l=LIi-,EAR  fit 

97  F2  ELAG:0=NG  AUTO  CHECK, 1=YES      (in  E) 

53  F3  FLAG:    0=MAL^UAL  READ  TEMP ,  HL^I  C ITY ,      1=AUT0  TEMP , LEW  "pT 

99  F3  FLAG-SORT  &  FIT:l=G/T-ELLv ,2=G/T-CSC, 3=DIP-ELEV ,4=DIP-TIME 

IOC  r3  FREC{GhZ)    SELLCTLL  tOR  RL'^ORK,   0=RE'v.OFi;  ALL  FREC 

101  F3  FLAG:0=XTAL,1=TYPE  IV  bridge   (in  E) 

102  F4  FLAG  IN   E :  1=S  I  lVULAT  EC  nCISE  ADD,2=EARHT  TERMINAL 

103  F4  FILL   LCAL  ? 

104  F4  FILE  S  OF   u7  =  l,   STARTING  M{4C,1) 
IQb  F5  FLAG  lu  D:1=PRGM  REwORK 

106  F5  FLAG   IN   L:1=«0ISL  ADD  ;1  ViORKS 

107  F5  P(G«T)    e  -F:    in  C/kT  ireas 

108  F5  FLAG-PROGR  REWORK  PATTERiN :  0=NO 

109  F5  FLAG:   0,1=  volt  table  in  LINEARITY  ck,   2 , 3=£tability  GRAPH    (in  E) 

110  F6  FLAG  TASK:1  =  :,E,.  SITE ,  2=MEAS ,  3=REW0RK  ,0=KANL  VIA  KEYBOARD 

111  F6  FLAG-AuTO  5ECbENCE:l=YES 

112  F6  FLAG:0=RESTART,1=SKY,2=G/T,3=EIRP ,4=LINK 

113  F6  FLAG   IN  E:C=rRGyi  A1TU,1=STD  ATTN 

114  F6  FLAG   IN  E:1=.nOISE  ALL  J  2  WORKS 

115  F7  FLAG:    0=CAS5ETTE  BEIuG  USED,1=DISK 

116  F7  FLAG-PWR  LEVEL:    0=CCN5T,    1=STEPPED       (in  E) 

117  F8  FLG   in   E:(KEY  5)  0  =GRA?  il ,  1=L  1ST  ,  ( KEY  6)0=SIKL  NCISE  ALD,1=EARTH  TERM 

118  F8  P(ONT)    e  +F:   in  C/kT  rreas 
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for     wBSlX.02,    NbSlA.Ol,   NBSlb.02,    NBSIC.OI,  NBSlD.02 


FLAG    IN   D:1=N0  FIT  CUTS 

STORE    SET  #   OF   SUMMARY  OF   REWORK  DATA 

ATT«  VALUE  OF  LAST   PROG  ATTEN    IN  FNW 
T{sky)/Ta:    in  C/kT  rreas 
ANTENNA  GAIiM  ,REL 

CURVE   t IT  MATRIX 

OXYGEN  ABSOFPTION  (QB/Km) 

IvATER  ALSOFFTION  ,«  1  CONST    (  oB/Km) 

VvATER  ALSORTICN,    #2  CONST    ( oB/Km) 
HOUR  ANGLE  OFFSET  (deg) 
S1!-ULATED     STAR  NOISE  (dS) 

MAIN   PROGRAK  HEADING 

FIT  TO  G/T  or   i^LF  data   {  3  *  1 S/S  QR  {  #  PTS )  )  ,  dB 
INSTE   Pv;R  RESPOimCE  FACTOR 

ADDED  nOISE,K 
LOOP  VARIABLE 
HPBW 

PLOT  UNIT 

DRUG  Pi.R  when  imOISE  ADD  sources  ON 
riAXIKbl-:  FLUX   IN  F.U. 

SELECT  FUNTION:19=G/T,2  0=G/TA,  21=HPEWj;l,  2  2=#2,24=DL>.i.,2  5  =  NEF,26  =  NUF 
KB    for   POINT  SOURCE 
LOOP  VARIABLE 

K1*K2*. . .*K9 

ATMOSPHERIC  ABSORPTION  TRANSMISSION  COEFF 
STAR  SHAPE  FACTOR 

bANDV;iDTHS   EFFECTS  FACTOR 
DIFFERENTIAL  SKY  TEMPERATURE  FACTOR 
ANTENNA   POINTING  FACTOR 

At^TENNA  POLARIZATION  FACTOR 
SYS'i'EM  RESPONCE  FACTOR 
DIFFUSIVE  ATTENUATION  FACTOR 

REFACTIVE  ATTENUATION  FACTOR 
LLEVATlON(deg) 
FREQ,DIAM,G/T  HEADING 

ELEVAT10N--tjO  REFRACTION  CORRECTION 

FLAG   IN  D:0=GRAP1j,  1  =  ERR  PRT  OUT-no  V  AR  lA  BLES  ,  2  =w  it  h  variables 
ELEVATION  REFRACTION  CORRLCTI ON , deg 


119 

F8 

120 

F5:f  • 

121 

F9 

122 

F9 

123 

C 

124 

G(I,J) 

125 

G4 

IzG 

G5 

127 

G6 

128 

H 

129 

h 

13u 

H$ 

131 

El 

152 

h5 

133 

h9 

134 

1 

135 

1 

1  jc 

li. 

137 

J 

lib 

J 

139 

J 

140 

Jl 

141 

Jl 

142 

K 

143 

Kl 

144 

K2 

145 

K3 

146 

K4 

147 

K5 

148 

K6 

149 

K7 

150 

K8 

151 

K9 

152 

L 

153 

L$ 

154 

LO 

155 

LO 

156 

LI 
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VARIABLES  LIST      #  9 
for     NES1X.02,    NBSlA.Ol,    NBSlb.02,   NBSIC.OI,  NBSlD.02 


157 

LI 

158 

L4 

ICQ 

liD 

16  0 

L6 

161 

L7 

I  >« 

liO 

163 

L9 

164 

Id  d 

M  (  N  /  ,  J  ) 

166 

Mi 

16  7 

Kl 

1  ^  n 
lo  C 

Vii.  ,  .  .  ri  4 

169 

K2 

170 

M3 

1/1 

172 

K6 .  .  .M9 

173 

N 

1  T  >l 
i  /4 

N 

1"  5 

N (1  ,o  ) 

176 

NO 

177 

Nl 

178 

N2 

179 

N3 

180 

L<<4 

161 

N5 

182 

n6 

183 

u7 

184 

N8 

185 

N9 

186 

01,02,03 

187 

06 ,07 ,08 

188 

P 

189 

P$ 

190 

PI 

191 

PI 

192 

PI  ,P2 ,P3 

193 

P6  ,P7 ,P8 

194 

0,QO,Q1 

ELEVATION   FOR  FITTING  G/T  OR  G 
EFFECTIVE  OXYGEN  LENGTH,  Km 

KATER  PATH   LENGTH  CONST* 1 
\s^ATER  PATH  LENGTH  CONST*  2,  Km 
WATER  DENSITY  (gm/m'3) 

REFRACTION  CONST  #1 
REFRACTION  CONST  #2 
G/T  RELATIVE 

SUIiMARY  DATA:    SEE  MATRIX  LIST 
LOOP  VARIABLE 
SUM  ON  P 

ATTN  OF  PGM  1,2,4,8   @  30  MHz, PGM  USES  N (13,1... 4) 

SUM  ON  X 
SUM  ON  Y 

MEASUREMENT  #    g  MAXIMUM  AMPLITUDE 

ATTN  OF  PGM  1,2,4,8   g  70  MHZ,    pgm  uses  N(13,6.,.9) 
DATE,   DECIMAL   t OR  MOON  DATA 

MEASUREMENT  NUMBER 

iNPul'  DATA  CONST,      SLE  MATRIX  LIST 
STAR  NUMBER,  CURRENT 

NO.   OF  STAR  SOURCES 
CUT  NUMBER 

Pl.R  MEASUREMENT  #  WITHIN  A  CUT 

LARGEST  N3 
PAGE  NUMBER 
RUN  # 

SET  # 

SUMMARY  DATA   #    =  M(50,l)    =  N7+F4 
NUMBER  POINTS    IN  FIT 

filters! (2. 5MHz  &   30MHz)    CON STS : N ( 1 5 , 1 )  , N  ( 15 , 2 )  , N  ( 15 , 3 ) 
FILTER*2(lMKz   (§  70MHz)    CONSTS  :  N  ( 1  5 ,  6 )  ,  N  ( 1  5  ,  7 )  ,  N  ( 15  ,  8  ) 
POWER  MEASURED, MILLIWATTS 

PROJECT  HEADING 
STAR  SHAPE   ERROR, % 
RECEIVER  GAIN  SLOPE/mHz 

FILTERS    (2.5MHZ  @   70KHz)  CONST  S :  N  ( 16  , 1)  ,  N  ( 16  ,  2  )  ,  N  ( 16  ,  3 ) 

FILTER1r4  {5.3MHZ  &  70MHz)  CONSTS :  N  ( 16  ,  6 )  ,  N  ( 16  ,  7  )  ,  N  ( 16  ,  8 ) 
DUMMY 
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VARIAELLS  LIST     #  9 
for     NBS1X.02,    NBSIA.OI,   NBS1B.02,    NBSIC.OI,  NBSlD.02 


1  Q  ^ 

J.  7  ^ 

niiN  MV 

196 

Q3 

hPBW, ANTENNA  ALONE(i.e.    with  KANDA  CORRECTION) 

197 

Q3 

POWER  WITH   NOISE  ADD  ON 

199 

Q5,Q6 

dP(aQd)    in  C/kT  n.eas:   g  -F,  @  +F 

200 

R 

REMARKS:      SEE  REKARK  LIST 

on  1 

202 

Rl 

i-LRO  FOR  GRAPH 

203 

R2 

RESIDUALS  FROM  CURVE  FIT 

')  I,  A 

uIlMPrP    nP    POT  MT'^    PIT    TO  PJ^KfiRDTJi 

205 

s 

G/T   ERR -FLUX 

206 

S 

TIME(hrs)  ,  CURRENT 

20b 

S(1,J) 

STAR  DATA:   SEE  MATRIX  LIST 

209 

S3 

l^REDICTED  MEASUREMENT  #   FOR  MAXIMUM  STAR  PKR 

1 

1  I  sy  s  t  J 

211 

T(NO,J) 

INPUT  STAR  DATA:   SEE  MATRIX  LIST 

212 

Tl 

TIME  OF  1st  MEASUREMENT 

1  X 

214 

T2 

CURRENT  MEASUREMENT  TIME 

215 

T2 

RUN/SET 

216 

Tt 

N-6* (N7-1) 

217 

U 

PCV;ER  NORI-IALIZATICN 

218 

V 

VOLTAGE  ACROSS  PWR  BRIDGE 

219 

V 

-ALPHA , GAUSS  IAN  COEFF 

220 

VI 

SUM  ON  X*4 

221 

V2 

SUK  ON  X''2 

222 

V3 

SUM  ON  X"3 

223 

V4 

SUM  ON  P*X*2 

224 

V5 

SUM  ON  P*X 

225 

V5 

PARABOLIC  FIT  PAPJVMETER  h 

226 

V6 

Tstur/Ta=EXP(X-F(2)  *Kl"2) 

227 

V6 

SUM  ON  P"2 

228 

V7 

aT(star)/TA 

229 

V7 

DV  ,#  1   RF  OFF 

230 

V7 

N3  OF  STAR  MAX 

231 

V8 

DV  ,  RF  ON 

232 

V8 

DISK  OR  TAPE  « 
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fcr     N3S1X.C2,   NBSIA.OI,   NBS1B.02,    N3S1C.01,  N3S1D.02 


233 

V9 

DV  ,12  RF  OFF 

234 

V9 

CT  (  STAR )  /TA  P  Rt  OICTF.U 

^35 

;i  A.^i'?-:  1  i.-'i':*.  {;■""•.  Z  ) 

236 

Wl 

VARIENCL  OF  F { STAR) /P (ADD) 

237 

X 

TIME  VARIABLE,  2*I/N4-1 

2  3& 

x$ 

SUBKCuTINE  HEADING 

23S 

XI 

Xi  =  G/dT  (  Star) 

24C 

XI 

LOOP  VAR^IAbLE 

241 

XI 

TIiVE  VARIAELE,  2*(N3-M3)/N4 

24  2 

X2 

GAh:>-A,FARAECLIC  FIT 

243 

X2 

VARIAELE  IK  FNG{N3) 

244 

X4 

K*S/2/k 

24  5 

X5 

AZUMuTH  BIAS  (deg) 

246 

X6 

ELEVATION  BIAS  (deg) 

247 

V 

Y-t  ACTOE 

246 

y  (I) 

MATRIX   USED   IN  CURVE  FIT     OR  DUMMY 

24S 

Yl 

G/T   EBR-Y   factor  (C8*Y5) 

25U 

Y5 

Y/(Y-1) 

251 

COLD   SKY   POWER  /  TA 

252 

2,1 

2,ENITh  ATM  ATTN,  dB 

2bj 

SERRGR  VARIABLE 

25'. 

i5 

C/kT  Kx£AS:T(ONT) /Ta  FCR  UPPER  FREQ 
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MATRIX  LIST      I  9 
for     iMBSlX.02,   NiiSlA.Ol,   NdS1B,02,   NbSlC.Ol,  NBSlD.02 


1 

A  ( 

1) 

BUN/SLT  =  100*N6  +  N7:   i^5=RUNt(,  N7=SETI 

2 

A( 

2) 

FREQ (MHZ) 

'i 
J 

A  { 

3  ) 

A^lbih^ii  iL^)^r^t)  lu 

4 

A  ( 

4) 

BEW  PT{F)  *10 

5 

A  ( 

5) 

RELATIVE  HbKIDITY(%)  *10 

c 

D 

A  1 

Li-iUULJ   L-UvLK         iUU    +  WiNU(inpn) 

7 

A  ( 

7)  * 

PV.R  LEVEL,  ir,  icrowatts 

8 

A  ( 

7)  X 

COBE(ul)  :0  =  SKY,    1  =  -F,    2=RCR  @   F,    3=  +  F,  4 

=OTHER 

r. 

A  1 

o  ) 

rWK  KA i i u  lh LLK : m icr ODe X i S/ lU 

10 

A  I 

8)  rw 

T/Ta*10"4 

11 

A  ( 

9)  * 

U*10*4:    REFEREUCE  PWR 

12 

A  1 

9)  X 

NUi  UbLL> 

13 

A  ( 

10)* 

hPbW#l* 10'4 

14 

A  ( 

10)  X 

SLANT  BIST(KiP,):  LGT(E7)*1000 

15 

0  ( 

1  ,    1)  X 

AZIKiUTH:  (AZ  (  deg) -180)  *  100 

lb 

D  ( 

1  ,    2)  X 

LLEV  (aeg) *100 

17 

u 

2,  l)x 

FLAG  C2:    0  =  NO  STB  ATTN  WiiEN   NOISE  ABB  ON 

,    1=STB  ATTN  WHEN 

lb 

B  ( 

2 ,   2)  X 

KANUAL  ATTN   SETTING, dB  (E6) 

19 

B( 

3  ,    1)  X 

hUMBEK  OF  MEAS (N4) 

20 

B 

3,  2)x 

ULTLR   bANBWITH,HHz  (K)*10 

21 

D 

4  ,   1)  X 

P/PacQ(ave  of  se t) : LGT { P/Padd) 10" 4 

2^ 

b 

4  ,    2)  X 

TRX  PV;n:LGT(B4)*10"4 

23 

D 

5,  l)x 

PWR#l,ir.U  (  ave,  noise  add  OFF)  :LGT(  PkR)  *10  " 

(  (E2  +  E6) /lO) *10"4 

24 

L 

5,    2)  X 

GAIN  SLOPE  OF  RCR    (Pi)    *  1000 

25 

B 

6,    1)  X 

PWR   due   to  NOISE  ABB,ir,V\:LGT{PWR#2-PWR#l) 

*10*4 

26 

B 

1 ,  tM3+2)  X 

PWR  WITH   noise  add   OFF   i?  BOLO:  LGT{PVvR)* 

10'4 

27 

B 

2 ,N3+2) X 

PWR(noise  add  ON):   LGT ( BOLO  PKR)*10"4 

28 

U 

3 ,w3+2) X 

PWR/Padd : LGT ( P/Paad ) *  10  4 

29 

D 

4 ,n3+2) X 

TlF,E,nrE  (El)  *  10  "3 

30 

B 

5  ,N3+2)  X 

LGT (PWR  METER  V OLTAGE ) *  10 ' 4 

31 

B 

6 , N3+2) X 

ATTN,  TOTAL:  E2+E6 

32 

B 

T6,  D* 

AZir-:uTfi:  (AZ(deg)-lBO)*100 

33 

U 

[TG,  2)* 

ELEVATION (deg) *100 

34 

B 

T6,  3)* 

^   OF  HEAS(N4) 

35 

B 

T6 ,   4  )  * 

TIME  OF  PKEBICTED  STAR  MAX:  El*1000 

36 

B 

T6,  5)* 

BLCB  OtFSET  FROM  PRBBICTEB   STAR  CENTER: 

(Bl+Ll)deg  *1000 

37 

B 

(T6,  6)* 

LOG ( (  (Tst ar +  Tsy Stem) /Tad d)  /U)  *10"4 

38 

U 

[  T  6  ,   6  )  r  w 

LGT{ oT/Tadd) *10"4 

39 

D 

[T6,  7)* 

FIT  MEAS   »   AT   PEAK     *  100 

40 

B 

(T6 ,N3+7) 

LOG  {  P/U)  *  10*4  :    P=FKR  MEAS   mV,  ,   U  =  PWR  REF 

41 

M 

(40,  1) 

NUMBER  OF  SUMMARY  SETS   STOREB   IN  MATRIX 

M 

42 

M 

(40,  3) 

NUMBER  OF  FILES   USEB  IN  BISK  STORAGE 
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MATRIX  LIST     #  9 

for  iNBSlX.02,    IMBSIA.OI,    NaSl£.02,    NBSIC.OI,  NBSlD.02 

43  ro(iM6,  1)  LLEV(ceg)    +  STAR#/100 

44  K(NS,  l)c  STAR  S/10  0 

4  5  l)x  CODE  +  .07 

46  h(N8,  2)*  G/T(gB) 

4  7  h(.^8,  2)d  T/Ta  ZENITH  (b5) 

4  8  /.  (N&  ,  2)  X  PV.R/Pa 

45  3)*  G/TA(dB) 

50  tidMb,  3)d  T/Ta  CSC  COEFF  (B6) 

51  K(IvS,  3)x  PWR(ir,Vi) 

52  H(.N8,  4)*  hPBWifl  (deg) 

5  3  !-(N8,  4)Q  TIKE,    DECIhAL  HRS  {FNT2) 

54  .\(w8,  4)x  FV;r  cue   to  Ta  (mW) 

55  r.  (W8,  5)*  HPbV.-#2  (deg) 

56  MCWb,  5)  o  TEMPERATURE,  F  (A(3)/10) 

57  ?;(1>;8,  5)x  C/kT(dB) 

58  l:(:-S,  6)  PRLt  (GHz) 

59  M(iM8,  7)*  y-f actor 

6U  K(NS,  7)  a  \%ATER  DEhSITY  (L7) 

61  r:(i\i5,  7)x  EIRP  (  dBw) +G/TA  (db)    =  E 

:.{tvb,  8)*  .-Ef  (KfU) 

63  Fi(iJB,  8)d  ImUKEER  OF    POINTS    IN  DIP  CURVE 

64  M(n8,  8)x  OiJT/Tadd:  (F2+Z5)/2 

65  h(NO,  9)*  NUF  (kFU) 

66  H(N8,  9)x  Pacc(Kw)  :  (E5+f8)/2 

6  7  M(N8,10)  RUN/SET:  N6+N7/10Q 

66  im(   1,  4)  SYSTEK  #   +   (DATA  REVISION  #/100) 

69  »(   1,  5)  DAC  REE   vol  t :  *  3=  6  .  3 1 3  ,  #  4  =6  .  3  6  7  ,  #  5=6  .  2  84  ,  #  6=6  .  24 

7C  N(   1,  6)  DAC  nult=-(chnl*9-?8)/*7:«3=0,3173,s4=0.32,#5=0.3187,#6=0.32 

71  N(   1,  7)  ATliv+ir.eter  (db/10)    5  .  3  §70  :  #  3=16  . 15  ,  #  4  =17  ,  3     5=1 5.  27  ,  #  6=- 17  . 5  5 

72  N(   1,  6)  RATIO  #1  add/^j2  add  &  MICROWAVE  FREO 

73  N(    1,  9)  NUMBER  OF  POINTS   IN  FIT 

74  N(    1,10)  REWORK  t 

75  N(    9&10,1)  STORE   STRING  PS 

76  N(13,  1)  ATTN   of   Idb  prgm  g  30MHz : # 3=0 . 96 1 

77  1^(13,  2)  ATTN  of   2dB  prgm       30v'.;z :  i  3  =  1 .  ril 

'lb  N(13,  3)  ATTN  of   4d&  prgm  g  30KHz :  #  3=3.  947 

79  N(13,  4)  ATTN  of  8dt  prgm  m  30MHz : # 3=7 .8 81 

80  N(13,  5)  ATTN   of  STD  RES  30KH z : *  3  =  5 .  9 2 2  , # 6= 4 . 779 
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81 

N  ( 

13  , 

6) 

ATTN  OF  IdB  prgm  e  7 0 : t 3  =  0 .  9 76  , # 4 =0  .  94 7  ,  #  5=0  .  9 38  , # 6 =0 . 97 3 

82 

L-i 

13  , 

ATTN  OF   2dB  PR&M    fi70**3=l    890  . (14=1   95   it5=l   854    #6  =  1  957 

83 

l\  ( 

13, 

8) 

ATTN  Of   4db  pcgm  @  70 : ; 3=3 . 909 ,# 4 =3 . 87 , # 5= 3 . 957 , # 6 = 3 . 924 

84 

13, 

9) 

ATTN   Of  8aB  PRGK   ^  7 0  :  #  3  =  7  .  8 9 6 ,  j}  4  =  7  . 8 6  ,  iJ  5  =  7  .  84 5  , # 6=  7  .  949 

fa  5 

i\ 

13 , 

10 ) 

AlTiN   of   STD  (>J  7  0  •  #  3=  5  .  9  66  .  #  4  =  5  .  92  .#  5=6   11. #6=6  1 

86 

15  , 

1) 

FILTifl  {2.  5fe30)   NOISE  BW :  # 3=  3  .  91 5  ,  «  4  =  3 .  8  87  ,  #  5=  3  .  64 3 ,  # 6  =3 .  5 52 

87 

w 

15  , 

2) 

FILISI  (2.  5Cd30)Nl,N!Hz:#  3=0.  009  38  ,i;4  =  0.  01526  ,#5  =  0.0178 

88 

15  , 

3) 

E ILIERS 1 ( 2 . 5Mhz  y  30KHz):2nd  CONST 

89 

N  ( 

15, 

4) 

FILT*1(2. 5^30) LOSS,dB:#3=3.09  2,#4=2. 711,#5=2.391,#6=2.560 

90 

IM  ( 

15, 

b) 

FlLTif2  (1@70)  NOISE  BW  :  #  3=1 . 1 93  , #  4=  1  ,  22  5  ,  t  5=  1 .  2 3  ,  #  6  =1 .  250 

91 

15  1 

7  ) 

F  ILT^i  2  (  1  (270  Uvl .  MH  z  :  i  3=-0    1043  . i  4  =  0   0817.^5=0  1271 

92 

N 

15  , 

8) 

F1LTEF#2  (iMHz  @  70Mhz):2nd  CONST 

93 

l\ 

15 

9) 

FlLl?f  2  (1G7  0)  LOSS,  dB  :Jf  3  =  4.  970  ,#4  =  4.  910  ,#  5=4  .  87  0  ,  #  6  =5 .  6  34 

94 

N 

16  , 

FILli;3f2    5(a701NCISE  BW*t3=2    B08   44=2   910   tS=?   937   #6  =  2  875 

95 

16  , 

2) 

FILT#3(2.  5070)  Nl ,  MH  z :  jf  3=- 0 . 1 0  2  ,  #  4=  0 .  0 108  ,  #  5  =  -0  . 1 30 

96 

N 

16, 

3) 

FILTLR*3 (2. 5MHz  @  70KHz):2nd  CONST 

97 

N 

16  1 

4  i 

FILT#3(2   5fa7  0  1  LOSS  .  gB  •  #  4  =5   78  . #  5=5  84. #6  =  5  814 

98 

U 

16  , 

6) 

FILT{f4  (  5.  3?70)  NOISE  BW  :  #  3=  5 .  73 4  , #  4=  5 .  8 0  , #  5=  5 .  8 56  ,  it 6  =5 .  6 71 

99 

N 

16  , 

7) 

FILTi;4  (  5.  3@70)  Nl,MHz:  #  3  =  -0  ,14  ,#  4=-0.0782,#5  =  0  .011 

IOC 

16  , 

FTIj1FR»4(S    3Mhz  0   70f-'.Hz1  •2nd  COi\iST 

101 

N 

16 

9 ) 

LOSS,aB:M  =  4.18,#5=3.14,if6  =  4.08  3 

102 

U 

17 

6) 

HLT#6  (0  .06^70MHz)  NOISE  BW  ,MHz  :  #6=0  .  08  3 

103 

N 

(17 

7) 

F1LT#6  (0  .  06e70l>jHz)  Nl  ,KHz :  # 6=  0 .  0 0178 

104 

N 

[17 

9) 

F1LT#6  (0  .06ia70MHz)  INSER  LOSS  ,  dB  :#  6=4  .  719 

105 

N 

(lb 

5) 

RATIO  #1  ada/#2  add  (3  30MHz 

106 

N 

(18 

10) 

RATIO  #ladG/#2add  @  7 0 : # 4=0 . 515 , # 5=0 . 526 , # 6=0 . 2468 

107 

N 

(19 

r  1) 

G/T(dB)  INTERCEPT 

108 

N 

(19 

,  2) 

G/T(dB)  ZENITH 

109 

W 

(19 

,  3) 

G/T(dB)    INTERCEPT  IS  ERR 

110 

N 

(19 

,  4) 

G/T(dB)    liiENITH  IS  ERR 

111 

N 

(19 

r  5) 

G/T(aB)    ELEV  COEFF 

112 

N 

(19 

,  6) 

G/T(dB)    CSC  COEFF 

113 

N 

(19 

,  7) 

G/T(qB)    ELEV  COEFF  ERR 

114 

N 

(19 

,  8) 

G/T(cB)    CSC  COEFF  ERR 

115 

(  20 

r  1) 

G/TA(6B)  INTERCEPT 

116 

N 

(  20 

r  2) 

G/TA(dB)  ZENITH 

117 

U 

(20 

,  3) 

G/TA(dB)    INTERCEPT  IS  ERR 

118 

N 

(20 

r  4) 

C/TA    ZENITH   IS  ERR 
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iiy 

on 

-> ) 

kj/  I  Pi  \  Cu }    LXiLV  cutrr 

120 

20  , 

6) 

G/TA(dB)    CSC  COLFF 

TO! 
1  Z  1 

Kl 
JN  ' 

ZU  f 

•7  \ 

'  ) 

TOO 

1  z  z 

L\ 

ZU  / 

ft  ^ 

123 

N 

21 , 

1) 

HPB'vN*  1  (  aeg)  IiMTEPCEPT 

i  Z4 

Kl 

9  1 
Z  X  f 

^ ; 

UPh^U"'**^!  7PMTTH 

1  Z  D 

N 

^  X  f 

■3  \ 

J ) 

PPl^V.  ^1  (  nci  n\     TMTPPPPPT    ^  ^  PRR 
iir^DwrTX\Utryj     llNitLxxk^Ltl     XO  I-ir\jA 

126 

N 

21 , 

4  ) 

HPBV;#l(deg)    ZENITH   IS  ERR 

N 

Z  X  f 

c  \ 

J ) 

i  z  0 

r  9  T 

Z  X  r 

129 

N 

21 , 

7) 

HPbVv#l(aeg)    ELEV  COEFF  ERR 

M 

Ln 

9  1 
Z  X  r 

ft  \ 

t-:p-;i>o*^i    per*  phppp  ppp 

X  J  1 

fi 

9  9 
Z  Z  f 

■1- ) 

I-iPRl*''^  9  (  r\Ci  n\  TrJTPPPFPT 
n  r  L>\i  r  Z  Vt-'^y'  lWiurv'*^£jirX 

132 

LN 

22, 

2) 

HPclWjf2  ZENITH 

X  J  J 

^  ^  r 

"5  ^ 
J  / 

X  ^ 

N 

4  1 

135 

W 

22, 

5) 

riPBV.#  2(  deg)    ELE'v  COLFF 

X  -5  O 

I J 

L-i 

(  9  9 

o ; 

X  J  / 

IN 

9  9 
Z  Z  f 

13o 

N 

(22  , 

&) 

tih^-.,^2{aeq)   CSC  COEfF  ERR 

X  J  ^ 

LH 

■1- 1 

X  *1  w 

^ ) 

141 

u 

24 

n-l^FCL  (  dpol    TNTFRCrPT    IS  CRR 

142 

N 

24  , 

4) 

D-DECL(ceg)    ZElUTH   IS  ERR 

143 

N 

(  24  , 

5) 

D-DLCL(Qeg)    ELEV  COEFF 

144 

N 

(24  , 

6) 

D-DECL(ceg)   CSC  COEFF 

145 

N 

(24  , 

7) 

D-DECL(Geg)    CLEV  COEFF  ERR 

146 

24  , 

8) 

D-DECL(oeg)    CSC  COEFF  ERR 

147 

(25, 

1) 

NEF(kFlj)  intercept 

148 

Iv 

(25, 

2) 

NEF(kFU)  zenith 

149 

N 

(25, 

3) 

NEf(kFU)    intercept  IS  ERR 

150 

N 

(25, 

4) 

WEF(kFU)    zenith  IS  ERR 

151 

N 

(25, 

5) 

NEF(kFU)    elev  coeff 

152 

(25, 

6) 

i>iEF'(kfU)    esc  coeff 

153 

N 

(25, 

7) 

NEF(kFU)   elev  coeff  err 

154 

N 

(25, 

8) 

UEF(kFU)   esc  cceff  err 

155 

W 

(26  , 

1) 

NUF(kFU)  intercept 

156 

N 

(26  , 

2) 

NUf(kFU)  zenith 
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157 

K 

26  , 

3) 

NUF(kFU)    intercept  IS  err 

158 

26  , 

4) 

NUFlkbLi)    zenith  IS  err 

15  9 

u 

26  , 

5 ) 

NLjf  (ktU)   elev  coerf 

160 

26  , 

6) 

NUF(kFU)   CSC  coeff 

161 

u 

26  , 

7) 

NbF(kFU)   elev  coeff  err 

16  2 

u 

26  , 

8) 

NUt(kFU)    CSC  coeff  err 

163 

I  ,J 

) 

PROG  COi.STS  1<26:I,    1=A  ,  2  =B  ,  e  tc  ;  J  ,    1=1 ,  .  .  .  ,  1  0  =  0  ,    11  =  N0  SUBSCRIPT 

164 

s 

NO  , 

1) 

STAR  FLUX    (F.b.)    y   STANDARD  FREQ 

16  5 

s 

NO  , 

2) 

S'IAR=RT  ASC    (oeg);     SOLAR=GHA  &  0   gmt  (deg) 

166 

uo , 

3) 

STAR=N.    DEC.    (deg);      SOLAR=N .   DEC.    %  0  GMT  (deg) 

167 

s 

NO  , 

4) 

ELUX  AT  THE  WORKING   FREQ  (F.U.) 

168 

T 

9  , 

1 ) 

Si  ORE  STRING  P$ 

169 

T 

14  , 

9) 

DAYS(STAR  EPIC)    SINCE   1977=#DAYS  SINCE  1900  -  28125 

170 

1 

14  , 

10) 

LAYS  (SOLAR  EPIC)    SINCE  1977  =  i;DAYS   SINCE   1900  -  28125 

171 

'i 

NO  , 

1 ) 

STAR/SOLAR  NAME 

172 

l' 

(NO, 

4  ) 

* 

SPECTRAL    INDEX  SECULAR  E XPANS I ON ( %/ Y r  )  *  10 00 

173 

T 

(NO  , 

5) 

* 

SPEC   INDEX  SECULAR  EXPN  UNCE RTAI NTY  (  %/Y r ) *  10 00 

174 

T 

NO  , 

6) 

SPECTRAL   INDEX   *  1000 

17  5 

(  iJO  , 

7  ) 

* 

StLCTIAL    INDEX   ERR  *  1000 

J.  7  0 

- 

n'o  , 

8  ) 

* 

fLuX   ERR   &   STD  FREQ    {%)    *  10 

17  7 

(  ivU  , 

y ) 

DISK   SIZE    (ARC   MiN)    *  100 

17  8 

nO  , 

1  U  ) 

t  LUX   ERR        F(%)    *  10 

179 

T 

(  NO  , 

11) 

* 

LINEAR  POLZ  (%)    *  10 

180 

T 

(NO  , 

11) 

s 

GilA/hr   *   10  00 

181 

■T 
1 

(  NO  , 

12) 

* 

LINEAR   POLZ   LRR(%)    *  10 

182 

'i 

(NO  , 

12) 

s 

N.    DLC./hr  *  1000 

183 

T 

(  NU  , 

13) 

* 

POLZ  ANG   (deg)    *  10 

184 

1 

(ijO  , 

13) 

s 

HORIZONTAL  PARALLAX   *  1000 

185 

1 

( ^'■O  , 

14  ) 

* 

POLZ  ANG  ERR  (deg)   *  10 

186 

1 

(NO  , 

14  ) 

c 

AGE  OF  ^;00N  (oays) 

187 

T 

(  NO  , 

15) 

* 

FLUX  EPOCH,    YEAR* 10 

188 

T 

(NO  , 

16) 

* 

:=ECULAR  DECAY  of   flux  (%/Yr)*100 

189 

I' 

(  NO  , 

17) 

* 

SECULAR   DECAY  of    flux   ERR  (%/Yr)*100 

190 

1 

(NO  , 

18) 

* 

STD   FREv(GHz)    *  100 

191 

T 

{  NO  , 

19) 

* 

^;IN   FREQ    (GHZ)*100  WHERE   FLUX  CALC  VALID 

192 

1 

(NO  , 

20) 

* 

i\AX   FREiw    (GUz)*100  WHERE   tLUX  CALC  VALID 

193 

1- 

(NO  , 

21) 

FLAG:    0=STAR   DATA,    1=S0LAR  DATA 

194 

1 

(NO  , 

22) 

s 

GhA/HR   (aeg)    *  1000 
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195       T(N0,23)s       N.    DEC./hr   (ceg)    *  1000 
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1 

FLAG  1 

2 

FLAG  1 

3 

FLAG  1 

4 

FLAG  2 

5 

FLAG  7 

6 

F  LAG  9 

7 

FNA(NO) 

8 

fUo (Q) 

9 

FNC(Q) 

10 

FND(O) 

11 

FNL (NO) 

12 

FwFa  1 

13 

FiMFb  0 

14 

f  nFc  0 

15 

FNFc  1 

16 

fi«Fd  0 

17 

FI*Fq  1 

18 

F  1<F  d  2 

19 

FKFd  3 

20 

FNFd  4 

21 

FNFq  5 

22 

t  KF  a  6 

23 

F  imF  d  7 

24 

FhF  d  8 

25 

FNFd  9 

26 

FNFd  10 

27 

FNFe  0 

28 

FNG (Q) 

29 

F  m  (Q) 

30 

FNI (Q) 

31 

f-NJ  (Q) 

32 

FNK(NO) 

33 

FNL  1 

34 

FNL  1.1 

35 

FNL  1.2 

36 

FNL  2 

37 

FNL  2.1 

38 

FNL  2.2 

39 

FNL  3 

40 

FNL  4 

41 

FNL  6 

42 

FNL  7 

STAR  FLUX  CALC   FOR  SPECIFIED   FRCQ    &  DATE 

l  =  LIi:'K  DATA  INPUT 

DISK  STORAGE   (F7)    <r-rgm  A> 

G/T   ERRORS  CALCULATED   FOR  SPECIFIC  FREQ  &  DATE 
PET   OUT  EKR  :l  =  V./0  COinSTS 

HEADING:1=EYPASS   DATE , F REC , ATN   DI AM , G , G/T , G/T a 

ANT  POINT:NO=STAR  #  I N : H , LI , B 1 , E 1 ;  OUT:A,L,L0  < NBS7 4 11 ,  7 4 49  , 8 3 3 9> 
BEEP:   Q=#  OF  BEEPS 

PAGE  HEADING:   Q=<;   SPACES   BEFORE  PRT  HEADING 

INIT  HARDWARE:    0=VTVy  ,BRG,  NOISE   C=  NOMINAL,    1  =  INIT  PV.R  BRG 
ERROR  CALC  FOR  G/T:   nO=STAR  # 
REWIND   IIJT  CASSETTE 

SITE:   W.    long,   N.    lat,  alt 
SET*  CHAimGL 

SOURCEt   CHANGE,   RESET  KAT  A   &  KAT  D 
RESTART 

ques  DATA  ON  TAPE/DISK , TAPE  # 
head  ing  G/T  ,  G/T  a,  NEF ,  iJU  F ,  Y- factor 

heading  Kl,. . . K9 , K . A-e f f , R-ef f ,S , Xi 
BEST   FIT  5  CUTS 

heading  *HPBW  #1  =...+. ..CSC  L= . . .    (ant  HPBW  =  ) 

neacing:  G(ct)  G-dif£  T(K)  Ta(K)  Y-fac  HPbwerr  data  fit  c(l-K2)  . 
ques:    DATA  SLT# 

A$=  1....!....!....!....!....!....!....!....!....! 

prt  Xl,K2,K3,K6,K8,K9,K,A-eff,R-eff,S,Xi 

prt  A2,C9 ,D1,N (21, 1) ,T(1 ,9) ,C8,D8,D9 ,J 1,N (21 ,3) ,T(1, 11) ,C2 
ATTN  SETTING,    FILTER  IDENTIFICATION  HEADING 

CURVE  FIT:0=INIT,-99=CALC  FIT    ( ou t : I , R2 , W 1 , V 5 ,G ( I , J ) , Y ( I) ) 
HEADINGS:    0=FIT  #,    1=TAPE  # 
DRAW  LINE:1  -;2  — ;3  ==;4  ##;5 

KEY  SUB:   0=KEY         SEE   KEY  LIST 
K-FACTOR  CALCe.g  .  K1,K2,...,K9 
G/T   plot  (J=19) 

G/T  err  TABLE:   no  print  variables 
G/T  err  TABLE:   print  variables 
G/Ta  plot   (J  =  20) 

G/Ta  err  TABLE:   no  print  variables 
G/Ta  err  TAELE:   print  variables 
HPBW#1   plot  (J=21) 

HPbW#2   plot  (J=22) 
Y-lactor  plot  (J=24) 
NEF   plot  (J=25) 
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43 

FNL  8 

44 

Fi>W  (w) 

45 

t  NN (Q) 

46 

FNO  (ij) 

47 

48 

4  9 

I  iNR(Q) 

50 

BiMS{Q) 

51 

FNT(g) 

52 

53 

F:JTd{L) 

54 

FNU(C) 

55 

t  LtV  (01 

56 

F  NV  d  0 

57 

FlJVd  1 

58 

f  NVd  2 

59 

F  l>iV  d  3 

60 

FNVd  4 

bi 

F  uV  Q  5 

62 

F  NV  Q  6 

63 

iUVd  7 

64 

FNVd  8 

65 

t  NVd  9 

66 

FNVd  10 

67 

FNVq  11 

68 

FNVd  12 

69 

FNVd  13 

70 

BWV.  (Q) 

71 

FNX  24 

72 

FNX  27 

73 

FNX  28 

74 

FNX  29 

75 

FNX  30 

76 

FNX  31 

77 

FNX  3  2 

78 

FNX   3  3 

79 

FNX  34 

80 

FNX  3  5 

Ml   plot  (J=26) 

KETEORGLOGICAL   INFG:G=INPUT  DATA,1=PRT   DATA , 2=SELECT  HAN/AUTO 

ANSWER  ROUTINE: DISPLAYS  Q,   SPACE   =  NO  CHANGE 
AIMS   ROUTINE  SEQUENCE 

PRK  yi£AS:0=#l&#2,l  =  #l,2  =  #2,3=PKR,mw   (IN:   A3  ,C  2 ,  E2  ,  V  ,  FNDl ) 

PRGM  conEt(MAT  N ) : 1=LI ST , 2 =cor rec t , 3=N ( I , J )    to  variables 
READ (ENTER  DATA)    LEV  ICE : 2=DVH , 3=CL0CK ,4 =BREAK  ShITCHS 
SPACE  PAGE  Q  SPACES 

TIME,DECIKAL  KRS:1=SET  UP  El    (IN:  E3,E5,N4) 
DUKKY  USED   IN   ERROR  P RT  OUT   IN  DW63B 
calc:  ANT  hPBW#l(min  of  arc) 

PRW  RATIO  CHECK:      IN:C2,E2,C3     CUT : A ( 7 ) ,A ( 8 ) 
VOLTAGE  READING: volt  range  +  channel  #/10  0 
RESTART 

calc:  G/T,G/Ta,NEF,NUF  errors 

til   X=EXF(V* (V2-W1) '2) 

calc:    GRAPH  RANGES   for  AUTO  SEQ 

celc:   LINEAR  S.  CSC  FIT  PARAMETERS 
(.=  FNf-2    &  RETURN 

reao:  RV\RKt,bLT  ,E  ,  T/Taif  90  ,  esc ,  HPoVs  e9  0  ,  esc ,  Ta 

FIT  #1  OF  5  CUTS 
FIT  #2  OF  5  CUTS 

calc  Ta  via  G  at  zenith  =B2* (D*F/0 . 313 ) '2 , B2 

f 

set  FLAG  F8  if  REWORK*  not  integer 
loaa  PI  OR  SUMMARY  I-iAT  H,   MAT  N 
STORE     MAT  K  &  MAT  N 

calc  B,B0,B2,G  via  b2 , G-d if f =C 7 ,Ta=H9 ,B9 
V.AIT  Q  MILL  I  SEC 
DVM  AUTORANGE 

0.  100000  V  DVM  RANGE 

1.  000  00  V  DVM  RANGE 
10. 000  0  V  DVM  RANGE 

100.000  V  DVM  RANGE 
10  00.00  V  DVM  RANGE 
DC  FILTER  OUT 

DC  FILTER  IN 

RATIO:    FILTER  IN 

AC  VOLTS  (not  installed) 
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81 

FNX 

40 

OHMS 

(  not 

installed) 

b  2 

FNX 

48 

PRGM 

ATTN 

=  15dB 

83 

FNX 

49 

PRGM 

ATTN 

=  14dB 

84 

FNX 

50 

P  RGM 

ATTN 

=  13dB 

85 

Fi«X 

51 

PRGN 

ATTN 

=  12dB 

b6 

tlMX 

52 

PRGM 

ATTN 

=  lldB 

87 

FNX 

53 

P  RGM 

ATTN 

=  10dB 

bb 

Fnx 

54 

PRGti 

ATTN 

=  9dB 

b9 

FNX 

55 

PRGM 

ATTN 

=  8dB 

90 

fcNX 

56 

PRGM 

ATTN 

=  7dB 

91 

FNX 

57 

PRGM 

ATTN 

=  6dB 

9^ 

EM 

58 

prg;-i 

ATTN 

=  5aB 

S3 

FNX 

59 

PRGM 

ATTw 

=  4dB 

94 

FNX 

6U 

P  ROM 

ATTN 

=  3dB 

95 

INX 

61 

PRGM 

ATTN 

=  2aB 

96 

FNX 

62 

PRGM 

ATTN 

=  IdB 

97 

FNX 

6  3 

P  RGM 

ATTN 

=  OdB 

98 

FNX 

64 

NO  RF 

to 

BOLOMETER     &      STD  PAD  IN 

99 

f  l.X 

65 

RF  tc 

BOLOr:ETER      &     STD  PAD  OUT 

10  0 

t  na 

66 

STD  ATTN 

IN 

101 

F  NX 

67 

STD  ATTN 

OUT 

102 

FNX 

68 

NO  RF 

TO 

BOLOMETER 

103 

tNX 

69 

RF  TO 

BOLOMETER 

104 

FNX 

72 

NO  RF 

to 

HOLOMETCK   &   STD  PAD   IN    (avoid-USE  FNX64) 

105 

t  lmX 

73 

RF  tc 

'  BOLOf-ElER  &   STb  paa  OUT    (avoid-USE  FNX6  5) 

106 

FNX 

74 

STL  ATTN 

IN   (avoid  -  use  FNX66) 

107 

FNX 

75 

STD  attn 

OUT   (avoid  -  use  FNX67) 

108 

FNX 

70 

NO  Rt 

tc 

BOLOMETER   (avoid  -  use  FNX68) 

109 

FNX 

77 

KF  to 

•  BOLUMEIER   (avoid  -  use  FNX69) 

110 

FNX 

80 

NOISL 

ADD 

tl   &   #2  ON 

111 

FNX 

81 

NOISE 

ADD 

#1   &  #2  OFF 

112 

FNX 

82 

NGISC 

ADD 

ifl  ON 

113 

FNX 

83 

NOISE 

ADD 

#1  OFF 

114 

F  NX 

84 

NOISE 

ADD 

#2  ON 

115 

FNX 

85 

M)i  sr; 

AUIj 

116 

FNX 

88 

NOISE 

ADD 

11  &  #2  ON   (avoid  -  use  FNX80) 

117 

FNX 

89 

NOISE 

ADD 

)fl  S,  12  OFF   (avoid  -  use  FNX81) 

118 

FNX 

90 

NOISE 

ADD 

11  ON     (avoid  -  use  FNX82) 
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119 

fhX  91 

120 

f  NX  92 

121 

FNX  93 

122 

fNX  96 

12  3 

F  NX   9  7 

124 

FisX  96 

125 

fuX  9  9 

126 

f  NX 10  0 

127 

t NX 101 

128 

f  NX  10 2 

129 

F  kX  1 0  3 

13u 

t  NX  104 

131 

I  NX  10 5 

t  uX 10  6 

133 

f  NX  10 7 

134 

F  NX  10  e 

1  J  D 

t  l^^A  lU  y 

136 

FNX 110 

137 

J:..X111 

13  9 

140 

KEYa  0 

141 

KLYa  1 

14  2 

KEYa  2 

143 

KEYb  0 

144 

KEYb  1 

145 

KEYb  2 

146 

KCYb  3 

14  7 

KLYb  4 

14b 

KEYb  5 

149 

KEYb  6 

150 

KEYb  7 

151 

KEYb  8 

152 

KEYb  9 

153 

KEYb  10 

154 

KEYb  11 

155 

KEYb  12 

156 

KEYb  13 

NOISE  ADD  #1  OFF      (avoid  -  use  FnX83) 
NOISE  ADD  fe2  ON      ( avoia  -   use  FNX84) 

NOISE  ADD  #2  OFF     (avoid  -  use  FNX85) 

OPENS  l-'ULTl PLEXEP  so  can  use  front  panel  inputs 

OPENS  MULTIPLEXER  SO  can  use  front  panel  inputs 

OPENS  IvbLTIFLEXER  SO  can  use  front  panel  inputs 
OPENS  ^'ULTIPLEXEF  SO  can  use  front  panel  inputs 
j  357   INPUT(e.g.   ext  p\vr  meter ):  channel  #11  =  110  0100 

PV:R  BRDG  vs  FINE  REE:   channel   #10   =  110  0101 

PKR  BRDG  vs  REF  VOLT,  set  fine  vclt:ch  #9   =  110  0110 

PRK  BRDG  OUlPbT:  channel  #8  =  110  0110 

D/A  REFERE.mCL  voltage:  channel  #7  =  110  1000 
CRYSTAL  DIODE  voltage:  channel  #6  =  110  1001 
D/A  OUTPUT:     channel   #5  =   110  1010 

+12  volts,  RF  UNIT:  channel  #4  =  110  1011 
+20  volts,  RF  UNIT:  channel  #3  =  110  1100 
DH>  POINT:     channel  if 2  =  110  1101 

TENP    (F/lOO):     channel   #1  =  110  1110 
GROUi^D  i-VK:     channel  #0  =  110  1111 
PLOT  DATA:    1=PRT  HEADING 

Xi  =  FNK  (NO)  *C1*S  (NO,  4)*  IE- 26 
RESTART 

CMAinGE  PRGNi  CONST   &   MODIFY  CORRESPONDING  N(I,J) 

LINl  :    1=S1TE   PREP,   2=MEAS,  3=RFV;0RK 

RESTART :0=RE ST A Rl , 1=LI NKMEAS , 2=REW0RK , 3=KEY  LIST 

oP DAT E : RU N# , DATE, SITE 

UPDATE:    FREC,&V.  ,ANT  PARAMETERS 
UPLA1E:ANT  POINTING  ERROR 
UPDATE:T,G/T,Ta,PVvR  RESP 

UP DATE: TEMP,   DEW  PT 

UPDATE  :SUN/^lOON  ALMINAC  DATA 

PRI :SITE     &      FLUX  DATA 

CALC:STAR  FLUX   ?  f 

PKT:TYPICAL  G/T  VALUES  AND  ERRORS 
STORE:  S,T,N 

PRT:LIST  OF  ALTERATE  STAR  ERR 
PRT:    ELEV  VS  GMT 
UPDATE:  N(I,J) 
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157 

KEYC 

0 

KESTAFT:1SKY,2G/T,3EIRP,4LNK,5NEW  TAPE  ,OMASTER  RESTART 

158 

KEYc 

1 

STAR:  RESIART   i?  N 

i5y 

KEYC 

2 

EIRP:START   e  SET  ? 

160 

KEYc 

3 

REFIT   5  CUTS:    USED  AFTER  ONE  OF  THE  CUTS   IS  RETAKED 

161 

KEYc 

4 

SIAR  FlX:routine  to  estab  ANT  BIAS 

lu  / 

KL  Yc 

c 
3 

CuANCjL  BlAb:hK   ANG,    ULLL,    A^  ,  ELEV 

163 

nEYc 

6 

ChAiJGL:  input  ATTN    (db),   FILTER  # 

164 

KEYc 

7 

CHANGE:   TA  =  ADDED  NOISE, K 

16  5 

KEYc 

8 

CiiANGE:  T{syst)/Ta 

166 

KEYC 

9 

CHANGE  STD  attn(C2)  :0=OUT  when  noise  add  ON,  1=IN 

16  7 

KEYc 

10 

STORE  CUTS  TAKEN 

16  8 

KEYc 

1 1 

STORE   INT:   MAT   N,S,T  and  PRGM 

169 

KEYc 

12 

STORE:^■AT  M  (  suinir.ary  data )  ,  N  ( prgn;  consts)   on  ext  CAS/DISK 

170 

KEYc 

13 

LIST  G/T  SUMMARY 

171 

KEYc 

14 

LIST   CURRENT  DATA     MAT  D 

172 

KEYC 

15 

CHANGE  FREQ  &  calc  new  STAR  FLUX 

173 

KEYc 

16 

CHANGE   #   PTS   IN  PARABOLIC  FIT  ROUTINE 

174 

KEYc 

1  7 

CHANGE:   G/TA (aB) 

175 

KEYc 

18 

CHANGE  NOISE  ADD  SOURCES    {C3  )  :  0  =  #  1&#  2  ,  l  =  it  1  ,  2  =  #  2  ,  3=PWR  (mW) 

17o 

t.L\C 

19 

LAST  KLASUREi-iEi^il  :  initiates  storage  steps 

177 

KEYd 

U 

RESIART  :0REWORK,  ILOAD  ,  2AUT'C'  SEQ  ,  3UEL ,  4G/T  ,  5F  IT ,  6PLT  ,  7ERR 

176 

KEYd 

1 

RESTART   &  N=? 

179 

KEYd 

2 

calc:STAR  FLUX  VALUES , Ta,  eff  area 

l&O 

KEYd 

3 

EuTEK  TEMP, A  (3)  , 'AND  DEV^  PT    ,A(4)    USED   IN  REWORK 

161 

KEYd 

4 

prt:   G/T  DATA  SUMMARY  with  page  heading 

182 

KEYd 

5 

SORl  ,FIT   and  LIST  DATA 

183 

KEYd 

6 

prt:  G/T  DATA  SUMMARY  (no  heading) 

184 

KEYd 

7 

STORE  MAT   M    &  MAT  N 

185 

KEYe 

0 

RESTART:0=KEY  LIS'I,1=AUT0  CK,2  =  N0  AUTO(F2=0) 

186 

KEYe 

1 

CHECK  LIST 

187 

KEYe 

2 

CHECK  DVM 

188 

KEYe 

3 

CHECK  CHANNEL  VOLTAGES 

189 

KEYe 

4 

CHECK   PRGM  ATTENUATORS 

190 

KEYe 

5 

CHEK   PWR,TYPE1V   &  ATTN  STABILITY 

191 

KEYe 

6 

CHECK   NOISE  ADD  STABILITY 

192 

KEYe 

9 

cues:    NEW  FREQ, BK, INPUT  ATTN,SIKi  STAR  NOISE 

193 

read 

CLOCK 

ENTER( 3  ,*)C,D:C=«1  THUMB  SW,D=SK   «2   #3  #4  HHMM.SS 

194 

read 

DVM 

ENTER(2,*)A,B:   A=FUNCTION,  B=VOLTAGE 

195 

read 

KBYTE   4=INTEGER  SUM  OF  BINARY  SWITCHES 

196 

read 

Sis  Y 

BIANb(R0T(K£YTE4 ,Y) 1) =1  IF  SWITCH  Y   IS  UP 
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1 

V 

-ALFKA, GAUSSIAN  COEFF 

2 

D3 

ADDEL  NOISE  ERROR, % 

3 

H9 

ADDED  NOISE, K 

4 

32  ,83 

ANTENNA  APERTURE   EFFICENCY,   ANT  RADIATION  EFFICIENCY 

5 

D 

AN1ENNA   DIAKETER (FT) 

6 

B9 

ANTENNA  EFFECTIVE  AREA 

7 

G 

ANTENNA  GAIN,REL 

S 

D5 

ANTENNA  POINTING   ERROR  (deg) 

9 

K5 

ANTENNA  POINTING  IfACTOR 

10 

K6 

ANTENNA  POLARIZATION  FACTOR 

11 

B4 

ATMOSPHERIC  BRIGHTNESS  TEMPERATURE,  K 

12 

Kl 

ATKOSPHERIC  AESORPUGN   TRANSMISSION  COEFF 

13 

A3 

ATTENUATION  OF  STD  ATTN    (abS>l    ,   NOT  dB), RELATED  TO  N(13,10) 

14 

EC 

ATTENUATION (cB)    OF   PROGRAM  ATTENUATOR,    TEKPORARY  VALUE 

15 

Ml. . .M4 

ATTN   Ot    PGh  1,2,4,6   @  30  MH2,PGK   USES  N(13,1...4) 

16 

K6  .  .  .b'.B 

ATTN  OF  PGM  1,2,4,8   @  70  KHZ,    pgm  uses  N(13,6...9) 

17 

F9 

ATli,   VALUE  Of   LAST   PROG  ATTEN   IN  FNW 

18 

E2 

ATTNUATIOn { db)    OF  PROGRAM  ATTENUATOR 

19 

E6 

ATTUNATICN (dB) ,   MANUAL  ATTENUATOR 

20 

A 

AZIUMTH(deg)    OR  DUMMY 

21 

X5 

AZUMUTH  BIAS  (deg) 

2  2 

oANDVriDTH(MHz) 

23 

K3 

LANCV:iDTHS  EFFECTS  FACICR 

24 

J 

BRDG  PV:R  when  NOISE  ADD  sources  ON 

25 

Z5 

C/kT  MEAS:T(ONT) /Ta  FOR  UPPER  FREQ 

26 

bl 

CODE  FOR  SATELLITE  CARRIER  MEAS : 0 =SKY , 1=- F , 2=RCR  &  F,3=+F,4= 

27 

Z 

COLD   SKY  POV.ER  /  TA 

rn  "1 

TZ 

CURRENT  MEASUREMENT  TIME 

25 

G{I,J) 

CURVE  FIT  MATRIX 

30 

n2 

CUT  NUMBER 

31 

CI 

C"2/(8*PI*K*F*2) 

32 

L ( T6  , 1 ) 

DATA  MATRIX:    SEE  MATRIX  LIST 

33 

C 

DATE,  DECIMAL 

34 

N 

LATE,   DECIMAL  FOR  MOON  DATA 

35 

E 

DAYS   SINCE  1900.00 

36 

Bl 

DECL  OFFSET  (deg) 

37 

B6 

DEK  POINT(F) 

38 

K4 

DIFFERENTIAL  SKY  TEMPERATURE  FACTOR 

39 

D8 

DI tE US IVE  ATTENUATION  ERP , % 

40 

K8 

DIfFUSlVE  ATTENUATION  FACTOR 

41 

V8 

DISK  OR  TAPE  # 

42 

A$,B$ 

DUMMY 
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43 

W,QO,iJl 

DUMMY 

44 

iw2,Q3 

DUMMY 

45 

B  (I 

DUMMY  MATRIX 

46 

I  (I 

) 

DUMi^lY  MATRIX 

47 

V8 

DV  ,    RF  ON 

4b 

V7 

DV,#1  KF  OFf 

49 

V9 

DV,#2  RF  OFF 

50 

L4 

EFFECTIVE   OXYG EW   LENGTH.  Km 

51 

E 

EIRP*G/Ta 

52 

£1 

EIRP:PWR  no  noise  add  (mV*) 

5  3 

E3 

r I RP • PWR+noi se   add  #1  fmW^ 

54 

L4 

LIRP  :PV;R+noise  add  it  2  (mW) 

55 

E5 

ElKP  :PKR+noise  eca  #1  f.   #2  (inW) 

b  G 

57 

LI 

ELEVATION   FOR  FITTING  G/T   OR  G 

5o 

X6 

ELEVATION  BIAS  (aeg) 

60 

LO 

ELEVATION — uO  REFRACTION  CORRECTION 

D  1 

ERROR  ennancen.ent  factor  for     KEF,NUF   compared  to  G/T 

0  ^ 

t  4 

[.Tri-'    4^    r^p   ft"7  —  1       c^'  A      1  Kir^   m  /  yi  n    l  \ 
t'lLit.    ft    Ur    U  /  —  i.  ,    aiAKIlNb  M(4U,J.J 

6  3 

F4 

Fir.F    LOAD  t 

64 

Al 

FILTER  # 

65 

C9 

FILTER  BAiiLPASS  (MHZ) 

66 

C8 

FILTER  f REQ  (MHz) 

67 

01, 

02  ,03 

FILTERU  (  2.  5MKZ   @   30MHz)    CONSTS  :  N  ( 1  5  ,  1 )  ,  N  (  1  5  ,  2  )  ,  N  ( 15  ,  3  ) 

68 

06  , 

07  ,08 

FILTLR#2  (iMllz   @  70MHz)    COUSTS  :  N  (1  5  ,  6  )  ,  N  ( 1  5 ,  7  )  ,  N  ( 15  ,  8  ) 

69 

PI  , 

P2  ,P3 

tILTEP«3    (2.5MHz   @   70MHz)    CONST S : N ( 1 6 , 1)  , N  ( 16  ,  2 )  , N ( 16 , 3 ) 

70 

P6, 

F7  ,PB 

F1LTER#4    (5.3KHZ       70MHz)    CONSTS  :  N  ( 1 6  ,  6  )  ,  N  ( 16  ,  7  )  ,  N  ( 16  ,  8  ) 

71 

HI 

FIT  TO  G/T   or    NEF  data   ( 3* IS/SQR ( #PTS) ) , dB 

72 

F5 

FLAG    IN  D:1=PRGM  REWORK 

73 

FB 

FLAG    IN  D:1=N0  FIT  CUTS 

74 

LO 

FLAG    IN  D: 0=GRAPH , 1=ERR  PRT  OUT-no  VARIABLES , 2=w ith  variai 

75 

F4 

FLAG    IN   E :  1  =  SIMULATED  NOISE  ADD,2=EARHT  TERMINAL 

76 

F5 

FLAG    IN   E:1=N0ISE  ADD  #1  WORKS 

77 

F6 

FLAG    IN   E:0=PRGM  ATTN,1=STD  ATTN 

78 

F6 

FLAG    IN   E:1=N01SE  ADD  #2  WORKS 

79 

t6 

FLAG  'IAEK:1  =  NEW  S 1  TE  ,  2  =H  EAS  ,  3=REW0RK  ,  0  =MAnL  VIA  KEYBOARD 

80 

F6 

FLAG-AUTO  SEiJUENCE:l=YES 
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81 

Fl 

f LAG-GRAPU:0=N0,1=DATA,2=&FIT, 3=FIT,4=EXIT 

82 

C3 

fLAG-NOISE  ADD:   0=# 1&# 2 , 1=# 1 , 2=# 2 

0  ^ 

t  D 

84 

E2 

FLAG-PKT:G=ALL,1=PRGG  DATA,2=INPUI  ASSUMES , 3=G/T  EER,4=AHT 

ELEV 

65 

F7 

FLAG-PWR  LEVEL:   0=CONST,    1=STEPPED       (in  E) 

O  D 

r  J 

FLAG-SCRT   &  FIT : 1=G/T-ELLV , 2=G/I-CSC , 3=D I P-ELE v ,4=CIF-TIKE 

87 

f  5 

FLAG:   0,1=  volt  table  in  LINEARITY  ck,   2 , 5= stability  GRAPH 

(in 

06 

F7 

FLAG:   0=CASSETTE  BEI'iG  LSED,1=DISK 

0  3 

r  J 

tLAG:    C  =f-A.rUAL   READ  TEXP  ,  HUMIDITY ,      1=AUTC  TE.V?  ,CEV,  FT 

90 

F2 

FLAG:    0  =  NGRf--AL,l  =  DIFF  PLOT  DATA,  2=D  IFF  PLOT  OF   5  CUTS 

91 

Fl 

FLAG:  0=STAR,1=SATELLITE 

r  J- 

FLAG:    1=SUBR0UTINE  LCADED 

93 

t  2 

FLAG:0=CSC  fit,    l=LI:iEAR  fit 

94 

f  2 

FLAG:C  =  NO  AUT-Q  CUECK,1=YE3      (in  E) 

1 1 
r  X 

FLAG:0=PF.T  FKR  &  VOLTS,   2=GF-APB  PKR  FATIC      (in  E) 

96 

r  6 

tLAG :G=RESTART,1=SKY,2=G/T, 3=EIRP ,4=LINK 

97 

f  3 

ELAG:0=XTAL,1=TYPE  IV  bridge    (in  E) 

i — ' 

ELAT-ScB  ATTri   Ii-.  NCTSE  ADD  ?WR  v  EAS :  0  =N0  ,1=YES 

9S 

t£ 

i-LG    in  E:  (KEY  5)  0  =  GRAPU,  1=LIST  ,  (KEY  6)  G^SIKL  fiOISE  ADD,1=EARTH 

IGG 

FLG:(LGC  SITE  DATA) . (f 6=TASK) ( F4=PRk  CKAUGE? ) { F7=DISK ) 

X  X 

r  U 

FREC  ERR,% 

102 

f" 

tREg  OE  MLASLRmENT(GHz) 

103 

E  3 

FRLQ(GhZ)    SELECTED  FOR  REWORK,  0=REWORK  ALL  FREC 

FREt ,DiAK,G/T  HEADING 

J.  u  ^ 

r  7 

G  via  MPbV.'  -  G  via  G/Ta,  cB 

106 

C{1,J) 

G(I,J)    INVERSE     OR  DUMMY 

107 

Tl 

G/T     OR     G/TA  VAiUE 

108 

E5 

G/T   ERR-A;,TEM.A  POINTING 

109 

L6 

G/T   ERR-AiNT  POLARIZATION 

110 

El 

G/T   ERF-ATMOSPHERIC  ABSORPTION 

111 

L8 

G/T   ERR-ATK-GSPHERIC  DIFFUSION 

112 

£9 

G/T  ERR-ATfX)SPHERlC  REFFvACION 

113 

E3 

G/T  ERR-BANDV*IDTK 

114 

E4 

G/T   ERR-DIFFERENTIAL  SKY  TEMP 

115 

S 

G/T  ERR-fLUX 

116 

EO 

G/T  CRR-FREC 

117 

E  2 

G/T  LF.R-STAR  SHAPE 

116 

E7 

G/T  ERR-SYSTEh  RLSPONCE 
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119 

Yl 

G/T  EKF-Y  factor  (C8*Y5) 

X  ^  u 

K 

C/T  Rri.ATTVF 

121 

B7,B8 

G/Ta(GD)    ZENITH  CGEFF,CSC  COEFF 

122 

X2 

GAy,MA  ,  PARABOLIC  FIT 

123 

A2 

GAUSS  CLlRVE    FIT   ERROR.*  dT 

124 

C6 

GHA  TO  ARIES       0  GKT  (hrs) 

125 

L9 

GHA  TO  ARIES (deg) 

X  ^  D 

F 

127 

K 

HOUR  AKGLE  OFFSET  (deg) 

128 

I 

HPBVv 

X  ^  7 

hPhW    FIT   RY    f,Ali^STAN   TilRVF    TO    IJRTFT  ("I1K\;F 

130 

D2 

HPBVv   UNCERTAINTY,  % 

131 

B 

HPo.VsKmin  of  arc), AS  t-;EASURED-NO  KANDA  CORRECTION 

±  ^  A. 

C  \J 

133 

^3 

HPBvv,AWTEiMNA  ALO.MC(i.e.    v/ith  KANDA  CORRECTION) 

134 

N(1,J) 

INPUT  LATA  CONST,      SEE  t'.ATRIX  LIST 

A.  J  D 

T  ^  ijfi     1  \ 
X  \        f  \J  ) 

XLNirUX     k>lr\l\    L>rij.H.     oLiU    PirilJvXA  uXDi. 

136 

H5 

INSTR  PV.R  RESPONCE  tACTOR 

137 

C9 

INSTRUMENTAL  POWER  RESPONCE  ERR,% 

A  4 

139 

K 

K1*K2*. . .*K9 

14C 

Jl 

K3   for  POINT  SOURCE 

141 

N4 

LARGEST  N3 

142 

I 

LOOP  VARIABLE 

143 

Jl 

LOOP  VARIABLE 

144 

Ml 

LOOP  VARIABLE 

145 

XI 

LOOP  VARIABLE 

146 

H$ 

N.AIN  PROGRAM  HEADING 

147 

Yd) 

MATRIX   USED  In  CURVE  HT     OR  DUMI-iY 

146 

J 

MAXIMUM   FLUX   IN  F.U. 

149 

E6 

l-.CASUREMENT  #   OF   FIT   GAUSSIAN  CURVE  TO  DRIFT  CURVE 

150 

M3 

MEASUREMENT  #    ^  MAXIMUM  AMPLITUDE 

151 

N 

MEASUREMENT  NUMBER 

152 

E2,L3 

MONTH ,  DAY 

153 

T6 

iM-6*{N7-l) 

154 

V7 

n3  of  STAR  MAX 

155 

Nl 

NO.   OF   STAR  SOURCRt. 

15o 

PS 

NUMBER  OF  POINTS  FIT  TO  PARABOLA 

134 


IXUS2.00  <NBS   991  5,   0007>     T6    &  D5-F10 


REVISION  « 


-5- 


VAKIABLES  LIST      #  9 
tor     NBS1X.02,   iMcSlA.Ol,   hBSlb.02,    NBSIC.OI,  HBS1D.02 


lb? 

tiS> 

NUt';bLR  POIr^TS    Iim   f  IT 

15b 

G4 

OXYGLh  ABSORPTlUi'J  (dB/Km) 

t  b 

irvUivi)    e  +r;    in  l/ki  ireas 

Id  U 

f  5 

P{0;iiT)    (?  -F:    in  C/kT  neas 

ioi 

Lo 

P  (UiNiT)  ,n-il'.=  (£  5+J&) /2:    in  C/kT  MEAS 

16  2 

f  2 

P/Pa  for  LOmLR  F  RLU'  OwT:     in  C/kT  meas 

Id  3 

to 

PAGE  i^uMtER 

164 

V  5 

PARABOLIC  FIT  PARAKETER  h 

16  5 

1 5 

P  LOT  UNIT 

io  0 

P 

FUr.LK   KLAbUkLb  ,            i U Al  lb 

167 

U 

PO'WER  NOR>'ALIZATION 

10  c 

rUVvLK   IVlin    WUibL    AUU  UN 

10  9 

b  J 

fKLL'lLlLl/   r. Lftb Ul.LKLrJ  i    n    t  UK   MAXir.Ufv    biAK  rWK 

17  u 

PROJECT  HEADING 

1  /  ± 

3 

P.,K   f-jEAbUl.EKLiV  1    s    l^'.iinllN   A  (_U1 

1  /  Z 

ririK(r-V. ;    UiM    bai  blbNAL 

173 

A8 

RATIO  #1  aaa/t2  aao  uses  n(18,5  or  10) 

1/4 

RU 

RAilO  ^i£cio/#zaaa  y   /u  MHz,  pgin  uses  i.'<(io,iU) 

1  /  r 

f 

FvDCLIvtR  tRLvlGriZ) 

1  / 1, 

i-i 

ELCLI  VLR  GAII.  S  LOP  E/r.H  Z 

177 

Ks 

REFACTIvE  Al TENOATI ON  FACTOR 

178 

Lb 

R£FI-:ACTIOlv  const  #1 

179 

L& 

REERACTIOn  CCwST  If  2 

IbO 

L9 

REFRACTIVE  ATTENUATION  ERROR, % 

ICl 

L$ 

REMARKS 

1B2 

R 

REK/vRKS:     SEE  REKJiRK  LIST 

183 

R2 

RESIDUALS  FROM  CLFVE  FIT 

184 

AO 

REWORK  * 

185 

n6 

RUN  * 

186 

T2 

RUN/SET 

187 

J 

SELECT  FUNTION  :19=G/T,  2  0  =  G/TA,  21=HPBVJtl,  22  =  12,2  4 

188 

'Lb 

SERROR  VARIABLE 

189 

N7 

SET  # 

190 

A  ( N7 ) 

SET  DATA:    SEE  KATRIX  LIST 

191 

K 

SIMULATED     STAR  NOISE (dB) 

192 

CO 

SITE  ELEV  (Km) 

193 

C4  ,C5 

SITE:  W.LOnG   (deg),   N.  LAT   { deg) 

194 

DO 

SKY   BACKGROUND  ERR,  0.9/F"2 
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VARIABLES  LIST     #  9 
for      NBS1X.02,    N3S1A.01,    NBSlB.02,    NBGIC.OI,  NBS1D.02 


X  I?  J 

n 

196 

Fl 

SFACE  LOSS:    in  C/kT  K.EAS 

197 

E7 

STANI   RAl'^GE,10'6  Km 

X  J  o 

K'T  A  R    DATA-    SFF  MATRIX 

199 

S$ 

SiAR  NAKE 

2u0 

NO 

S1AR  uu::ber,  current 

2u  1 

ijl 

^'[•AR    9,-iAPF    FRR  % 

202 

K2 

star  SliAPE   FACTOR  . 

203 

Jrl 

STAR  SHAPE  ERROR, % 

204 

F'  9 

^Ti'jRr    SFT    t    i)F     NUMMARY   OP  RTWORK 

20  5 

x$ 

SUBROUTINE  HEADING 

206 

Ml 

SuK  ON  P 

V  *i 

C  1 1        r  t,\i     U  *  Y  9 
oUr'-    UlN    r^  A 

20b 

Vb 

SuK  ON  P*X 

2u9 

V6 

SU^.  ON  P"2 

CjUM    UN  A 

211 

V2 

SUM  ON  X'"2 

212 

V3 

SUM  OW  X*3 

V  i 

bUl-.    UW    A  4 

Ilk 

i'.3 

Sur:  Ou  Y 

215 

M (N7  ,J) 

SOi-iMARY   DATA:    SEE  MATRIX  LIST 

216 

NB 

SUNKARY   DATA   #    =  N"(50,l)    =  N7+F4 

217 

A4,A5,A6 

SYST   CONST S:PRGH   USES  N(1,4),N(1, 

218 

K7 

SYSTEM  RESPONCE  FACTOR 

^19 

F9 

T(sky)/Ta:   in  C/kT  rr.eas 

220 

T 

T ( syst) 

221 

B6 

T/TA     CSC  COEFF 

222 

b5 

T/TA  ZENITH 

223 

B5 

lEMPERATURE (F) 

224 

L3 

TIME  DELAY   TO  SET  ANTENNA  (SEC) 

225 

Tl 

TIME  OF    1st  MEASUREMENT 

226 

El 

TIME  OF  STAR  PEAK  (hrs) 

227 

X 

TIME   VARIABLE,  2*I/N4-1 

228 

XI 

TIME   VARIABLE,  2*{N3-M3)/N4 

229 

S 

TIME(hrs) ,  CURRENT 

2  30 

E8 

TIME ( hrs) / (ARC  ceg) 

231 

E5 

TIME/MEASUREMENT  (hrs) 

232 

E4 

TRANSMITTER  POWER,  WATTS 
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VARIABLES  LIST     S  9 
for     N5S1X.02,    NBSIA.OI,    lMcSlB.02,   NBSIC.OI,  NBSlD.02 


Z  J  O 

V  0 

i  S  t  c;  r  /  i  c—  LAr(A~t(ZJ''lrii  /) 

234 

I  0 

VALUE  OF  C2   IN  FhV 

z  J :? 

\  T 
A  ^ 

z  J  o 

237 

V 

VOLTAGE  ACROSS   Pi\R  BRIDGE 

Z  ^  0 

p  R 

o  I? 

^  J  37 

G6 

I  r'r^  /K 

24U 

L7 

WATER  DENSITY  (gm/i:."3) 

241 

L5 

WATER  PATH   LENGTH  CONST  SI 

242 

L6 

WATER  PATH  LENGTH  C0NSTS2, 

Km 

243 

XI 

Xi  =  G/dT{star) 

244 

Y 

Y-FACTOR 

^45 

C8 

Y-FACTCR  ERR,% 

^4  G 

Y5 

Y/{Y-1) 

247 

LI 

YEAR 

248 

L5 

YEARS    (JULIAN)    SINCE  1900 

/4 

24  9 

L6 

YEARS  SINCE  1977 

250 

2-1 

ZENITH  ATK  ATTiM ,  dB 

251 

Kl 

ILRO   FOR  GRAPH 

cP(ada)    in  C/kT  r>eas:    ?  -F 

,    ^  +F 

.53 

^9 

gt(star)/ta  predicted 

254 

V7 

dT(star)/TA 
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MATRIX  LIST     #  9 
for     NBS1X.02,   NBSIA.OI,   NBS1&.02,    NBSIC.OI,  NBSlD.02 

1  D(T6,    3) *  #   OF  MEAS(N4) 

2  T(N0,14)S  AGE  OF  KOON  (days) 

3  A(    3)  AMBIENT  TE.1P{F)    *  10 

4  J(13,    6)  ATTN  OF  IdB  prgrf  @  70  :  #  3  =  0 .  9  76  ,  #  4  =0  .  94  7  ,  #  5=0  .  9  38  ,  #  6  =0  .  973 

5  N(13,   7)  ATTI^  CF  2dB  PPGM  070  :  ?  3  =  1 .  8  90  ,  #  4  =  1 , 9  5  ,  #  5=  1  . 8  54  ,  #  6  =  1 .  9  57 

6  N(13,    1)  ATTN  of   Idb  prgm  @  30KHz : # 3=0. 961 

7  u(13,   2)  ATTN  cf   2db  prgir.  ^  30KKz :  #  3=1 .  881 

8  Im{13,   3)  ATTN  cf  4dB  prgii  g  30NH2 :  #  3=  3 .  947 

9  N(13,  8)  ATlix;  of  4dB  prgm  ^  70  :  #  3  =  3  .  9CS  ,fe  4  =  3.  87  ,  t  5=3 .  957  ,  #  6=3  .  924 

10  N(13,  4)  ATTN  Of  8dB  prgir       30F:Hz :  s  3=  7 .  881 

11  N(13,    9)  ATTiM  cf  8uB  FRGi-i  1?  7  0  :  #  3  =  7  .  8  9  6 ,  #  4  =  7  .  86  ,  #  5=7  .  84  5  ,  #  6  =7  .  94  9 

12  N(13,   5)  ATTN  of  STD  RES   30MH z : # 3 = 5 . 92 2 , # 6= 4 . 7 79 

13  1^(13,10)  ATTN  cf  STD  @  7  0  :  #  3=  5 .  9  66  ,  #  4  =5  .  92  ,  #  5=6  . 1 1 ,  it  6  =6  . 1 

14  L'j(   1,   7)  ATTw+.T.eter  (dB/10)    5  .  3  ^;70  :  #  3  =  16  . 1 5  ,  *  4  =1 7  .  3  ,  #  5=1 5 .  27 ,  #  6=-l  7  .  5  5 

15  b(6,N3+2)x  ATTN, TOTAL:  E2+E6 

16  L(   1,   l)x  AZIMUTH:  {Ai-(oeg) -180)*100 

17  i:(T6,   1)*  AZIKuTH:  (AZ(ceg) -180)*100 

18  M(N8,   5)x  C/kT(oB) 

19  A(    6)  CLOUD  COVER  *    100   +  VilND(inph) 

20  K(n8,    1)x  CODE  +  .07 

21  A(    7)x  CODE(El)  :0=SKY,    1  =  -F,    2=RCR  &   F,    3  =  +  F ,  4=0THER 

22  N(24,    1)  D-DECL(deg)  INTERCEPT 

23  N{24,   2)  D-DECL{oeg)  ZENITH 

24  N(24,    3)  D-DECL(Qeg)    IN1EPCEPT  IS  ERR 

25  N(24,   4)  D-DECL(deg)    ZENITH  IS  ERR 

26  h(24,   5)  D-DECL(Geg)    LLEV  COLFF 

27  N(24,   6)  D-DECL(deg)   CSC  COEFF 

28  N(24,   7)  D-DECL(Qeq)    ELEV  COEFF  ERR 

29  N(24,   8)  D-CECL(ceg)   CSC  COEFF  ERR 

30  N(   1,   5)  DAC  REF  vol t : « 3=6 . 3 13 , # 4 =6 . 36 7 , # 5=6 . 28 4 , # 6 =6 . 24 

31  N(   1,   6)  DAC  ir.ult  =  -(chr.l#9-#8)/#7:«3=0,3173,fi4=0.32,#5  =  0.3167,#6=0.32 

32  T(14,10)  DAYS(SOLAR  EPIC)    SINCE  1977=SDAYS   SINCE   1900  -  28125 

33  T(14,    9)  DAYS(STAR  EPIC)    SINCE   1977=#UAYS  SINCE   1900  -  28125 

34  D{T6,    5)*  DECL  OFFSET  FROM  PREDIC1ED  STAR  CENTER:    (Bl+Ll)deg  *1000 

35  A{   4)  DEW  PT(F)  *10 

36  1(N0,   9)*  DISK  SIZE    (ARC  MIN)    *  ICQ 

37  K(n8,    7)x  EIRP(gBw)+G/TA (dB)    =  E 

38  M(N8,   1)  ELEV(Geg)    +  STARf/lGO 

39  L(   1,   2)x  ELEV(deg) *100 

40  D(T6,    2)*  ELEVATION (deg) *100 

41  N(15,    1)  FILT*1  (2.  51330  )   NOI SE  BW :  #  3  =  3  .  91 5 ,  #  4  =  3 . 8  87  ,  #  5=3  . 64  3 ,  #  6  =3 .  5  52 

42  N(15,   2)  FlLTtl(2.5@30)Nl,MHz:n=0.  00938, #4  =  0. 01526  , #5  =  0. 0178 
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KATKIX  LIST      t  9 
for     uBSlX.02,   NBSIA.OI,    NBS1B.02,    NBSlC.Ol,  NBSlD.02 


43 

w 

1  5 , 

4  ) 

fILT#l(2.5f30)  LOSS  ,6L:#3  =  3.092,<r4  =  2.711,#5=2.391,#6  = 

2.  560 

44 

u 

15, 

6) 

t ILT# 2 ( 107  0) NOISE  BW : #3=1.193  ,#4  =  1  .  225,*  5=1.  23  , #6  =  1. 

250 

45 

N 

15, 

7) 

FILT#2  (1(^70)  Nl , MHz:  #  3=-0  .1043  ,#  4  =  0.  0817,#  5=0  .1271 

4  6 

N 

15 , 

9 ) 

FILT#2(lg70) LOSS ,cE:#3=4.970,#4=4.910,#5=4.870,#6=5. 

634 

47 

i\ 

16  , 

1) 

F1LT#3 (2.5 U70) NOISE  LW : # 3= 2 . 8 08 , # 4 =2 . 91 0 , # 5= 2 . 9 3 7 , # 6 

=2. 875 

4b 

N 

16, 

2) 

FILT#3 ( 2. 5e70)Nl,MHz: #3=-0 . 102 ,#4=0. 0108,#  5=-0.130 

49 

N 

16  , 

4  ) 

FILT#3(2.5(?70)  LOSS  ,dB:#4=5.78,#5=5.84  ,#6  =  5.814 

50 

16  , 

6) 

FILT#4  (  5.  3ti7  0)  NOl  SE  DW  :  #  3=  5 .  73  4  ,  #  4  =  5  .  80  ,  #  5=  5 .  8  56  ,  #  6  = 

5.G71 

51 

Iv 

16  , 

7) 

FILT#4(  5.3l?70)M,HH2:#3  =  -0.14  ,#  4=-0  .  0732,#5=0.011 

52 

N 

17 , 

6 ) 

FILl" #6(0. 06^70 MHz)NOISE  BK,I-;Hz:#G=0.083 

53 

ii 

17  , 

7  ) 

i-lLT#6  (0  .06&70hHz)  N 1 ,  J-.H z  :  # 6  =0  .0  0178 

54 

i'« 

17  , 

9) 

FILT#6(0.06@7CMiiz)  luSER  LOSS  ,  dB  :  #6=4  .  719 

55 

L. 

3 , 

2)  X 

FILTER   BANLiWIlh  ,NHz  (VV)*10 

5C 

115, 

3) 

FILTERS  1 (2. 5KKZ  fei  30KHz):2nd  CONST 

57 

I. 

15, 

8) 

FILTER#2  (IKHz  t?  70MHz):2nQ  CONST 

58 

I'. 

[  16  , 

3) 

F  ILTER#3  (  2.  5MH  z  i3  7  0WHz):2nd  CONST 

59 

1^ 

16  , 

8) 

FILTER#4 ( 5. 3MHz  @   70NHz):2nd  CONST 

60 

L 

T6, 

7)  * 

fIT  KEAS   #   AT   PEAK      *  100 

61 

L/ 

2 , 

i)x 

FLAG  C2:    0=NO  S'i  D  ATTN  WHEN   i^uISE  ADD  ON,    1  =  STD  ATTl>i 

V-JHEN 

6  2 

1 

no , 

21 ) 

FLAG:    0=STAR  DATA,    l=SOLAn  DATA 

63 

NO, 

4  ) 

fLUX  AT  IHE  V.ORKING   tREQ  (F.U.) 

64 

T 

WO  , 

15)  * 

FLUX  EPOCH,   YEAR* 10 

65 

T 

(NO  , 

6)  * 

FLUX  ERR    It?  STD  FREQ    (%)    *  10 

66 

± 

(NO  , 

10)  * 

ELUX  ERR  0  F(%)    *  10 

67 

y 

(N8  , 

6) 

EREQ  (GHZ) 

68 

A 

(  2) 

FRLQ(MHz) 

69 

(  N6  , 

2)  * 

G/T(dB) 

70 

IN 

(19  , 

6) 

G/T ( cB)    CSC  COEFF 

71 

N 

(19  , 

8) 

G/T( dB)   CSC  COEFF  ERR 

72 

N 

(19, 

5) 

G/T(oB)    ELEV  COEFF 

73 

N 

(19, 

7) 

G/T(cB)    ELEV  COEFF  ERR 

74 

N 

(19  , 

1) 

G/T(dB)  INTERCEPT 

75 

(19  , 

3) 

G/T(aB)    INTERCEPT  IS  ERR 

76 

(19  , 

2) 

G/T(gB)  ZENITH 

77 

N 

(19  , 

4  ) 

G/T(cB)    2.EN1TH   IS  ERR 

78 

N 

(20  , 

4  ) 

G/TA   ZENITH  IS  ERR 

79 

M 

(N8  , 

3)* 

G/TA(dB) 

80 

N 

(20  , 

6) 

G/TA(aB)    CSC  COEFF 
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k  "1 

O  X 

It 

^  u  , 

82 

N 

20  , 

5) 

G/TA(dB)    LLEV  COEFF 

8  3 

IM 

2U  , 

7  ) 

G/TA(dB)    ELEV  CGLFF  ERR 

ft  4 

IN 

^  u  , 

1  \ 

X  , 

lj/J.A(GL>J     il\ILhU  Lir  i 

b5 

N 

20  , 

3) 

G/TA(cE)    INTERCEPT  IS  ERR 

66 

l-j 

20  , 

2) 

G/TA(6B)  ZENITH 

ft  7 

T  , 

D  f 

X 

88 

T 

M  , 

22) 

s 

GKA/HR  (deg)   *   10  00 

8  9 

T 

UQ  , 

11 

s 

GHA/hr   *   10  00 

y  U 

T' 

i  l\\  \ 

s 

91 

(  [\&  , 

4  1 

* 

hPBWiil  (deg) 

92 

N 

21  , 

8) 

liPBK#l  CSC  COEFF  ERR 

N 

1  f 

HPBrt  #  i    Z  ENI TH 

94 

i<l 

(21 , 

1 

HPDKfKceg)  INTERCEPT 

95 

N 

21  , 

3 

HPBW#l(deg)    INTERCEPT   IS  ERR 

N 

4 

HPd..    i  {  CG  g)    ZLNllH    IS  ERR 

97 

N 

21  , 

5) 

ilPBK#l(aeg)    ELEV  COEFF 

98 

IM 

(21  , 

6) 

hPBV»Sl(Geg)   CSC  COLFF 

G  (J 

<1  1  , 

7 

HPtv>fi(Geg)    ELLV  CijEFF  ERR 

luG 

A 

IC) 

* 

iii-bui  1*  10  "4 

ICl 

^. 

,X'0  , 

5) 

* 

iiPbV,S2  (oeg) 

102 

N 

22, 

2 

KPBU'S2  ZEiMlTH 

103 

N 

22, 

1 

l.Pi.k%#2(  deg)  INTERCEPT 

104 

N 

22, 

3) 

nPBV,  #2(Qeg)    INTERCEPT   IS  ERR 

105 

Im 

22  , 

4  ) 

liPbV.?2  (  ceg)    ZENITH  ERR 

106 

22, 

5) 

hPBV.i2(Geg)    ELLV  COEFF 

107 

N 

22, 

6) 

HPBV:i;2(ceg)   CSC  COEFF 

108 

£4 

(22, 

7) 

liPbhi)  2  (  dec)    ELLV  COEFF  ERR 

109 

N 

22, 

8) 

HPbv-;!*  2  (  ccg)    CSC  COEFF  ERR 

110 

D 

5  ,iN 

3+: 

I)  X 

LGT(PKR  i\ETEP   VOLTAGE)  *10  "  4 

111 

D 

T6  , 

6) 

r  V. 

LGT(oT/Tadd)  *10'4 

112 

T 

NO  , 

11) 

* 

LINEAR  POLZ(%)    *  10 

113 

T 

NO  , 

12) 

* 

LINEAR  POLZ   ERI<{%)    *  10 

114 

D 

T6  , 

6) 

* 

LOG  {  (  (TEtar+lsy£:terr.)/Tadd)/U)  *10"4 

115 

D 

T6  , 

N  3+7) 

LOG(P/U)  *10'4:    P=PKE  MEAS  niK  ,   U  =  PWR  REF 

116 

N 

16  , 

9  ) 

LOSS , Ob  1*4= 4. 18, #5= 3. 14, #6= 4. 08 3 

117 

U 

2  , 

2  ) 

X 

MANUAL  AlTw   SL'lTING,oB  (E6) 

lie 

T( 

NO  , 

20) 

* 

MAX  FREC^    (GHZ)*100  WHERE   tLUX  CALC  VALID 
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MATKIX  LIST     tf  9 
for      KbSlX.02,    NBSIA.OI,    Nt:GlB.02,    NGSlC.Ol,  NESlD.02 


lis 

'i  1 

1.0  , 

19)  * 

KIN   FREt    (GhZ)*100  UHLRL  FLbX  CALC  VALID 

120 

'I( 

t;0  , 

12)  s 

li.   bEC./hr  *  1000 

1  ^  X 

1 

Ki  n 

N  U  f 

J  )  c> 

122 

i\  \ 

n8  , 

8)  * 

nEF   (  kFU) 

123 

l\  1 

25, 

6) 

i-iEF  {  kfu  )    C£C  ccef  f 

isLr^Kru;            v-cjtii  err 

125 

H 

25, 

5) 

i>iLr  (kfu)    elev  coef  f 

126 

25, 

7) 

NEt(kFLi)   elev  coeff  err 

0  Q 

-L  ) 

i\Er{kt'U)  intercept 

128 

25, 

3) 

iMLt(kFU)    intercept   IS  ERR 

129 

IM 

25, 

2) 

iMEF(kFU)  zenith 

130 

it 

2  5 , 

4  ) 

i^Ei(kiU)    zenith  IS  ERR 

131 

9) 

X 

ImCI  USEb 

132 

9)  * 

iMbl:  (kFU) 

13  3 

li 

26  , 

6) 

uui'(kFU)   CSC  coeff 

134 

26  , 

8) 

wuf(kFU)   c£c  cceff  err 

135 

IN 

26, 

5) 

ivbF(kFU)    elev  cceff 

136 

26, 

7) 

i4ijr{kFb)   elev  coett  err 

137 

26  , 

1) 

Nbt(kfb)  intercept 

13o 

26  , 

3) 

ivuf(ktL)    intercept  IS  err 

13!? 

26  , 

2) 

i,bF(kFb)  zenith 

26, 

4  ) 

iibr(Ktb)    zenitn  lo  err 

141 

b 

3  , 

l)x 

imLKEER  OF  MEAS  (N4  ) 

142 

i-] 

•.O  , 

1) 

:viU!'iL>LR  OF  sbK;-;Ary  sets  stored  lu  matrix 

143 

(40, 

3) 

NUr XER  OF    bILES   USED  Ii^l  LISF  STOPJ^GE 

144 

vi'a  , 

6  )  C 

i.bI-,bER  Of    t-OlNTS    lu  blP  CURVE 

14  5 

Li 

1 , 

9) 

i.U:-;dER  OF  POIi,TS    IH  FIT 

146 

^ 

N&  , 

8  )  X 

Oi>;T/l£Co:    (F2  +  Z5)/2 

147 

b 

4  , 

l)x 

ir/Pc!Gc(£ve  cf   set)  :LGT(P/Peod)  1C''4 

14B 

1' 

(hO  , 

13)  * 

ir^uLZ  At.G    (aeg)    *  10 

149 

■I- 

I.O  , 

14  )  * 

PCLZ  ANG  ERR    (deq)    *  10 

15U 

t. 

(I  ,J  ) 

PROG  COi,SXS   I<26:1,    1  =  A  ,  2  =B  ,  e  tc ;  J  ,    1  =  1,. 

151 

A 

(  7) 

* 

PKR  LEVEL,  i?icrcwatt£ 

152 

A 

(  8) 

PWR  RATIO  CtiECK  :r.icrcfcells/10 

153 

L. 

(1 ,N3+2) X 

PV.R  V.ITh   noi£G   aca  OF  F   (?  EOLO:  LCT{Pl\B)* 

154 

L 

(  6, 

l)x 

PUR   out    tc  NOISE   ACb,r:.V.  :LGT(PV.RS  2-PV,R*l) 

155 

^■ 

(W8  , 

4  )  X 

PWR  due   tc  T£.  (n.V^) 

156 

(  5, 

l)x 

PV.Rjf  l,n,U  (  eve,  roii  c  iidd  OFF)  :  LOT  (  H\  j; )  *10  * 
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for     lMclilX.02,   NnSlA.Ol,    NiiSlu.u2,    NtsSlC.Ol,  1mBS1D.02 


157 

M  ( 

i\.B  ,    3 )  X 

Pk-.RdrV.) 

1  Do 

r>  / 
Lf  \ 

159 

M( 

we  ,  2 )  X 

160 

D{ 

3 ,n3+2) X 

PVvR/P£Co:LGT(  P/Pado)  *  10  "4 

1  A  1 
XO  X 

fv  fc:        Q  \  V 
IMO  ,    y  }  X 

162 

u  ( 

1,  8) 

i'A'ilO  #1  aod/U  aoQ  e  t'.lCnOVvAVL  kRlQ 

163 

18,  5) 

RAIIC  jfl   ado/*  2  add       30^  Hz 

N 

1  o  /  1  U  ; 

ivA  i  1  u  ffiacc/r^aco  19   /  u  :  w 'i  — u  .  di  d  ,  s  d-u  .  dzd  ,  s  d  — u  .  Z'Ido 

16  5 

A( 

5) 

1;ELA11VE   HuMlblTY(%)  *10 

16  6 

1,10) 

REWORK  * 

io  / 

i  ) 

16  8 

M 

u8 , 10) 

KU:s/£LT:   in6  +  .m7/100 

16  y 

T 

,16)  * 

iLCULAR  DECAY  ct   1 1  ux  (%/Yr)*10U 

1  /U 

T 

NC , 1 7 ) * 

bLCULAR  lECAY  of   flux   EPF  (%/Yr)*100 

171 

A 

10)  X 

SLAUT  DlSKKir):  LGT(E7)*100C 

172 

1 

KU,  5)* 

SPEC   luDEX  SECULAR  EXPN  UNCE r.TA  1  wTY  (  %/Y  r )  *  10 00 

1/0 

r. 
1 

iirLLlivAL.    LliLiLfi    oLLUliAh    L  A  rAi.>lc>  i  v^iM  I  t  /  I  t )     i  U  U  U 

174 

1 

ivU,  6)* 

SPECTRAL   INDEX  *  1000 

175 

T 

uC,  7)* 

oPLCiFAL   INDEX   ERR  *  1000 

11  Kj 

i.MO  ,  1)0. 

SimR  5/100 

17  7 
X  1  1 

c 

U  ,  i  ) 

CTiAD      ETTiiV       /t      I'      \       f^     CPAvIPlAOT  tDL''»"l 

oiAK   rJjUA    (r.U.;     e   dIAlNUAKu  rKLv 

178 

T 

[i^O,  1) 

STAR/SOLAR  NAME 

179 

S 

(NO, 3) 

STAR=N.   ULC.    (deg) ;     SOLAR=N .   DEC.    @  0  GMT  (deg) 

180 

& 

(NO, 2) 

STAR=PT  ASC   (deg);     SOLAR=GHA  ^  0  gmt  (deg) 

181 

T 

(uO , 18) * 

bTD   FREt(GlIz)    *  100 

182 

N 

(  y£.io,i) 

STORE   STRING  P$ 

183 

T 

[   9,  1) 

STORE  STRING  P$ 

184 

(   1,  4) 

SYSTEM   #    +    (DATA   REVISION  #/100) 

185 

^, 

(IiS,  3)6 

T/Ta  CSC  COEFF  (B6) 

186 

K 

( N8 ,  2)6 

T/Ta   ZENITH  (b5) 

187 

A 

(  8)  rw 

T/Ta*  10  '4 

188 

M 

; w8  ,   5 )  d 

TLHPERATURL ,F  (A(3)/10) 

189 

D 

(16,  4)* 

TIME   OF  PRLLICTED  STAR  t'AX:    El*  10  00 

190 

h 

(N8  ,  4  )  d 

TIME,    DECIMAL  HRS  (FNT2) 

191 

D 

(4 ,u3+2) X 

TIME, hrE(Ll) *10"3 

192 

D 

(   4,  2)x 

TRX  PWR:LGT(E4)*10"4 

193 

A 

(  9)* 

U*10"4:   REtERENCE  PV.R 

194 

M 

( w8  ,  7 )  G 

V^ATLR  DENSITY  (L7) 
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KATKIX   LIST     #  9 
for     NtSlX.02,    N3S1A.01,    NES13.02,    NBSIC.OI,  UBSlC.02 


195      M(N8,   7)*       Y-f actor 
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RLVISICN   #  10 

fUl^lCTIGi^J,   KEY,    S.   FLAG  LIST     #  10 
tor     uBSlX.U2,   NbSlA.Ol,    WbSlL.02,    hBSICOI,  NBS1D.G2 


1 

FimX107 

+  12  volts,   RF  UMl: 

channel 

*4  = 

110 

1011 

2 

FwXlOS 

+  20  volts,   Kt    bMl  : 

channel 

U  = 

110 

1100 

3 

t  NX 

27 

0.100000   V  DVM  RANGE 

4 

FNX 

28 

1.00000    V   DVM  RANGE 

5 

Fi.X 

29 

10.0000   V  DVM  RANGE 

6 

f  1\.X 

30 

100.000   V  DVM  RANGE 

7 

Fl\X 

31 

1000.0  0   V  DVM  RANGE 

b 

FLAG 

1 

1=L1FR   DATA  INPUT 

9 

FNFd 

8 

1 

r 

1 

1 

10  FNX  30  AC  VOLTS   (not  installed) 

11  FNo(w)  AuS   ROUTINE  SEQUENCE 

12  FNN(i)  ANSWER  ROUTINE: DISPLAYS  Q,   SPACE   =  NO  CHANGE 

13  FNA(NO)  ANT  POI NT : NO =STAR   S    I N : H , LI , B 1 , El r    OUT:A,L,L0    <NBS7 4 11 , 7 44 9 , 8 33 9 > 

14  fNFe      0  ATTN  SETTING,    FILTER   IDENTIFICATION  HEADING 

15  l:i»B(w)  BEEP:   Q=9  Ot  BEEPS 


16  tNFc     4  bLSI    FIT   5  CUTS 

17  read  SV.  Y       t-I  A.,l;  ( ROT  {RbYTE4  ,  Y)  1 ) 

18  KLYb      b  CALCrSTAR  FLUX   @  f 


a   IF  SKITCH  Y   IS  UP 


I'j  KEYC  16  CLANGb   #    PTS    IN  PAr<ABOLIC  FIT  ROUTINE 

zO  KLYC  5  v,H/',NGL  BIASiHR  AwG,    ULCL,    h^,  LLEV 

zl  KEYC  15  ChAwGE  FRLi^  5,   calc  new  STAR  FLUX 

^  '^  t.L\c  Id  CtiANCL  iMUloL  ALL  SOURCES    ( C 3  )  :  0  =  ?  1  & i!  2  ,  l  =  if  1 ,  2  =  S  2  ,  3  =  PV.R  ( rr.h  ) 

23  KEYa  1  ChANCL  PRGK  COwSl    &   i\OOIFY  CORRbSPONbING  N(I,J) 

24  txLYc  9  ChAuGE  STD  at  tri  (C2)  :  0=OUT  when  noise  acd  On,  1=IN 

25  KEYC  17  CEANGE:   G/TA (dB) 

26  KLYC  B  CHAiXiGE:  T(£yst)/Ta 

27  KEYC  7  CiiAi.GE:   TA  =  ADDED  NOISE, K 


28       KEYC     6  CiiANCE:  input  ATTN  (db), 

2S        KEYe     3  CHECK  CHANNEL  VOLTAGES 

30       KEYe     2  CHECK  DVM 


FILTER  If 


31  KEYe      1  CHECK   LIST  ' 

32  KEYe      b  CHECK   NOISE  ADD  STABILITY 

33  KEYe     4  CHECK   PRGK  AT1ENUAT0RS 

34  KEYe      5  CHEK   Pl.R,TYPLIV    &  ATTN  STABILITY 

35  hNXlOS  CKYSIAL  biGbb  voltage:   channel   #G  =  110  1001 

jG  FnG(C!)  curve  FlT:0  =  lNn  ,-99=CALC  FIT    (  cu  t :  1  ,  R  2  , 1 ,  V  5  ,  G  (I  ,  J  )  ,  Y  ( I )  ) 

37  FNXlOG  b/A  OUTPUT:     channel   #5  =   110  lOlO 

3b  trNX104  L/A  REFERLNCb  voltage:   channel   tf7   =   110  1000 

3  9  f  NX   3  2  DC  f ILTER  OUT 


4U        FNX    33  DC   t  ILTER  IN 

41       FNX109  DEK  POINT:     channel   K2  =  110  1101 

i2        tLAG    1  DISK  STORAGE    (F7)    <prgii,  A> 
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FUNCTION,   KL'Y,    &    FLAG  LIST     #  10 
for      1.BG1X.02,    NbSlA.Ul,    t^'^^rilL .  02  ,    ImBSIC.OI,  lMi:.SlL.02 


43  FM(^)  LRAt.   LI..E:1  - ;  2  — ;3  ==;4    0;5  (?e 

44  FN'Kv)  L/LMI.Y  USCL   IN   LliHOL  t'f.'T   OUT   IN  UV;63B 

4  5  F^X    24  uVK  AUTO RANGE 

4  6  KLYc     2  LI  RP:  ST  ART   f  SET  ? 

47  ^LYc      3  LuTLI    TLMP,A  ( 3)  ;  AuL  uLV.  PT    ,A(4)    USED   IN  REVvGRK 

4c  reea  DVK  LwTLR  (  2  ,  *  )  A  ,tj  :   A=tUNCT10N,    L  =  VOLTAGE 

4i»  reac  CLOCK     Li.'i  LR  (  3  ,  *  )  0  ,  L:  C=f  1  Tiluhb  SW,D=SV.     2   #3  #4  HIIKM.SS 

5U  tNL.(NG)  LRRuR  CALC   FOR  G/T :   NO=STAR  # 

51  fNVd      7  FIT  #1  OF  5  CUTS 

52  F  .'VG     8  FIT   if  2  Of    5  CUTS 

53  FNvo      2  FIT  X= LX P ( V* ( V 2-W 1 ) " 2 ) 

54  FLAG  2  G/T    LPROPS  CALCULATEL  FOR   SPECIFIC   FRE(^  5.  DATE 

55  r.^L  1.1  G/'i   err  VABLE:   no  print  variables 
5o  FinL  1.2  C/T  err  TAlLE:   print  variables 

57  FNL   1  C/T   plot  (J=19) 

5^  FNL  2.1  G/'i  a  err  'lAbLE:   no  print  variables 

Ds>  FNL  2.2  G/Tc  err  'lAtLE:   frint  variables 

t)U  FimL   2  G/T  a  Diet    (J  =  20) 

6  1  ti/'lll  Gl^^uUL,  i^VR:     enamel   sO  =  110  1111 

tLAw   5  hLaulNL  :  l  =  bYPASS   L-ai  l  ,  t  Rl.i^' ,A'iivi   Li  A>. ,  G  ,  G/T  ,  G/T  a 

63  FtMri(i^)  ni^AuiiNiGS:    0  =  FI'i    tf  ,    l='iAPL  # 

64  FNL   3  hPtWtrl   plot  (J=21) 

65  FnL  4  HirDV,j}2   plot   (J  =  22) 

66  FNb(v^)  INII   hARDwARE:    0=  VTVK  ,  bRG ,  NOI  b  E   &  UOMNAL,    1=INIT  PV.R  bRG 

07  tiMXlOO  J  357   lr.i:'UT(e.g.   ext  pwr  neter ): channel  tf  11  =  110  0100 
6b  FlmK(wO)  K-F  actor  CALC,  e.g.  K1,K2,...,K9 

69  FNJ  (Q)  KEY   3Ub  :   C:=KEY   #,    SLL   KEY  LIST 

70  KCYc  IS  LAST  IS  EASURLI'iENT :  in  i  t  ic  te  s  Storage  steps 

71  KEYa     2  LINT:    1=SITE  PREP,    2  =  hEAS,    3  =  RLv,6rK 

72  KEYc   14  LIST   CURRENT  DATA     NAT  D 

73  KEYC   13  LIST  G/T  SUM^"ARY 

74  FNK(C)  y.ElEOPOLOGICAL   INFO:0  =  lNPUT  LATA,1  =  PRT  LATA ,  2  =S  ELECT  ^;AN/AUTO 

7  5  FNX   76  NO   RF    to  bOLG>;bTER    (avoia   -  use  FNX68) 

70  FNL  7  NEt   plot  (J=25) 

7  7  FNX   0  8  NO  RF  TO  BOLCN.ETER 

7  8  FNX   64  NO  RF   to  bOLO!''ETLR     6.      ETD   PAD  IN 

79  FNX   72  WO  RF   to  bOLOKETER  &   SI u  PAD   IN    (avoiu-USE  FNX64) 

80  FNX   80  NOISE  ADD   #1  &   j#  2  ON 


■I 
,i 

i 
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tUNCTlCu,   KLY,    &   FLAG  LIST     #  10 
for     i,B5lX.02,   UBSlA.Ol,    UbSlb.02,    WEblC.Ol,  NBSlD.02 


a  1 

t  NX 

8 1 

NGISL 

AUD 

#1 

&  #2 

OFF 

b2 

I  NX 

82 

NOISL 

AUU 

n 

ON 

d3 

t  uX 

83 

ADD 

#1 

OFF 

r.  i 

t  uX 

84 

imOISC 

ADD 

#2 

ON 

65 

I  M 

85 

NOISE 

ADC 

#2 

OFF 

86 

I  i  jX 

88 

NOISL 

ADD 

#1 

&  {f2 

C.\   (avoid  -  use  FNX80) 

c  7 

r  iiX 

8y 

L\OlSL 

Abi^ 

*1 

&  52 

Otb    {avoid  -  use  tNX81) 

t  i,X 

90 

NJISC 

ADD 

#1 

Oi, 

(avoic  -  use  FnX82) 

b  i 

k  1N.X 

SI 

NOISL 

ADD 

#1 

OtF 

(avoid  -  use  FnX83) 

9U 

I  1>,X 

92 

NOISE 

ADD 

#2 

On 

(avoio  -  use  FnX84) 

91 

t  i\X 

93 

nO  1 S  E 

ADD 

#2 

OFt 

{avoid  -  use  fNX85) 

■jz 

i-  uL 

8 

NUIr  plCt 

(>J  = 

26) 

t  nX 

40 

iwll  i-.b 

(  not 

in 

stalled) 

3  1 

96 

OPENS 

;;bLTlPLLXLR 

so  can  use  front  panel 

inputs 

3  5 

t  i,X 

97 

O'PLhS 

KULTIPLEXLE 

so  can  use  front  panel 

inputs 

96 

I  ivX 

98 

OPEuS 

I-.bLTIPLEXLR 

so  can  use  front  panel 

inputs 

97 

t  hX 

99 

oplns 

i^:ULTlPLLXER 

so  can  use  front  panel 

inputs 

98 

PAGE 

HEADING 

:   U  =  # 

SPACES  BEFORE  PRT  HEADING 

99 

iiJ's  (C) 

PLOT 

DATA 

:  1 

=  PRT 

HEADING 

1  Ji 

1 

4t 

p  F,c^; 

A'iTi; 

=  15dD 

101 

t  ..X 

49 

PPG/j 

ATTi. 

=  14db 

102 

t  imX 

50 

PPGM 

AT'I  N 

=  13db 

103 

t  UX 

51 

PRCM 

ATTN 

=  12dB 

104 

t  uX 

52 

PRGM 

ATTl^i 

=  lldB 

105 

i  .NJX 

53 

PRGM 

ATTi, 

=  10dE 

lu6 

t  nX 

54 

PRG-^i 

ATTN 

9ab 

107 

t  NX 

55 

PKGM 

ATTN 

8dE, 

103 

t  NX 

56 

PRGM 

ATTN 

7dB 

109 

t  wX 

57 

PRGW 

ATTN 

6ab 

110 

t  M 

58 

PRGM 

ATTN 

5dB 

111 

tNX 

59 

PRGM 

AT  TN 

4dB 

112 

FNX 

60 

PRGM 

AT  I  N 

3dB 

113 

t  NX 

61 

PRGM 

ATTN 

2dB 

114 

t  NX 

62 

PRGM 

AT  Tim 

laB 

115 

f  NX 

63 

PRGM 

ATTN 

OdB 

116 

HviO(Q) 

PRGM 

const(['iAT  N) 

:l=LIST,2=correct,3=N(I ,J)    to  variables 

117 

FLAG  7 

PRI   OUT  ERR: 

l=W/0 

CONSTS 

118 

KLYb  12 

PRT  : 

ELEV 

vs 

GMT 
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FUNCTION,    KLY,    5,    FLAG  LIST      «  10 
for     NbSlX.02,   WLSIA.OI,    NbSlL,02,    NESlC.Ol,  NBS1D.02 


119 
IzU 

KLYb  11 
KLYC  7 

PRT:LIST  OF  ALTLRATL  STAR  ERR 
PRT:SITL     &     FLUX  DATA 

121 
122 
123 

KLYb  9 
F1X.X10  3 
Fi>.P(Ci) 

PRT:TYRICAL  G/T  VALUES  AND  ERRORS 

PRW  LRLG  OUTPUT:   channel   #8  =  110  0110 

PRVv   KLAS  :0=#1J.«  2  ,  1=*  1,  2  =  «  2  ,  3  =  PV;R,ir,w   (IN:  A3,C2, 

E2 , V,FND1) 

124 
125 
126 

FUU (0) 

f;mxioi 

FMX10  2 

pnv>   FJ>iTlG  CLECK:      IN:C2,L2,C3     OUT  :  A  (  7  )  ,A  ( 8 ) 
PV,R  BRDG  vs   FIiNiL  REF  :   channel   *10  =  llO  0101 
PWR  bRDG  vs  REF  VOLT,   set  fine  volt:ch  #9   =  110 

0110 

127 
12b 
129 

F  Nvd  5 
t  NX   3  4 
read  SW 

C=FimF2   &  RETURN 
RATIO:    FILTER  IN 

KBYTE    4=INTLGER  SUM  OF  BINARY  SWITCHES 

130 
131 
132 

FuRiQ) 
rLYC  3 
ri\Fd  0 

LEAL  (ENTER  DATA)    DLV IC  L  :  2=DVN'i ,  3  =  CLOCK  ,  4  =LREAK  SWITCHS 
RLFIT    5  CUTS:    USED  AFTER  ONE  OF  THE  CUTS   IS  RETAKEL 
RESTART 

133 
134 
135 

FiMVd  0 
t;CYa  0 
KLYd  1 

RESTART 
RESTART 
RESTART    @  N=? 

136 
137 

13B 

KEYb  U 
KLYe  0 
K^'io  0 

RESTART  :0=RESTART,  l  =  LlNKMLAS,2=REVvORK  ,  3=KEY  LIST 

RESTART  :U=KLY   LIST,1=AUTG  CK,2  =  NU  AUTO(F2=0) 

R L. ST'  A  RT  :  0  REV,  0 FR  ,  1 LOA L  ,  2  AU TO  S  EC  ,  3 DL L  ,  4 G/T  ,  5F  I T  ,  6 P LT  ,  7  E RR 

139 
141 

KLYc  0 
r  lit  a  I 
FNX  6  9 

RESTART  :1SKY  ,2G/T,3EIRP  ,  4  Li:,K  ,  5n  LK  TAPL,OKASTER 
RElvIND    INT  CASSETTE 
RF  TO  BOLOMETER 

RESTART 

142 
143 
144 

r  NX  6  5 
FtiX   7  3 
FNX  7  7 

RF   to  BOLOMETER     &     STD  PAD  OUT 

RF   to  BoLO;-;ETER   &   STD  pad  OUT    (avoid-USE  FNX65) 
RF    to  BOLOKLTLR    (avoid  -  use  FNX69) 

145 
146 
147 

F  NFc  0 
FNFb  0 
KLYd  5 

SLT#  CHANGE 

SITE:  W.   long,  N.   lat,  alt 
SORT, FIT   and  LIST  LATA 

148 
149 
150 

FNFc  1 
FNS (Q) 
KLYc  4 

SOURCEi;   CHANGE,   RESET  MAT  A   &  MAT  D 
SPACE   PAGE  Q  SPACES 

STAR  FIX:routine  to  estab  ANT  BIAS 

131 
152 
153 

FLAG  1 
KEYC  1 
FNX   6  6 

STAR  FLUX  CALC   FOR  SPECIFIED  FREQ   (.  DATE 
STAR: RESTART  @  N 
STL  ATTN  IN 

154 
155 
156 

FNX  74 
FNX   6  7 
FNX  7  5 

STD  ATTN   IN   (avoid  -  use  FNX66) 
STD  ATTN  OUT 

STU  attn  uUT   (avoid  -  use  FNX67) 
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1-IUS2.00   <NBS   9915  ,    0007>     T6    &  D5-F10 

REVISION   I  10 

-5- 


I-UNCTIOu,    KCY,    &    FLAG   LIST      #  10 


for 

i^l-'iJ'X/^»V^f       L'*UOX/^*UXf       lil-'kJXLJaUA,       L4L^>^X\^*UXf  L>lL>kJXl<'*W^ 

15b 

FNVd 
KLYC 

12 
10 

^THRF       f-'AT    ^■    t    MAT  N 

STORE  CUTS  TAKEN 

15y 
16  0 
161 

KEYC 
KLYd 
KLYb 

11 
7 
10 

STOKE   INT:   KAI    N,S,T  and  PRGM 
STORE  MAT  M   &  MAT  N 
STORE:  S,T,N 

162 
164 

KLYC  12 
t  NXllO 

STORE  :KiAT  t;(suniniary  d ata )  ,  N  ( prg.T,  consts)    or.  ext 

I'Vlii-    (F/llJOl  •      channel   #1  =   110  1110 

TIi'':E  ,DECI1'-AL  HRS:1=SET  UP   Ll    (IN:  L3,E5,N4) 

CAS/DISK 

16b 
167 

KLYb 
KLYb 
KLYb 

2 
13 
3 

UPLATE:    FREC;,BV.  ,ANT  PARAMETERS 
UPDATE :ANT  POINTING  ERROR 

16  8 

110 

KEYt 
KLYb 
KEYb 

1 
6 
4 

UPLATE: RUN* , DATE , SITE 

I ] p r  AT r  •  ^ 1 1 M / NTin tv  Aii.ii  map  data 

UPLATE:T,G/T,Ta,Pl^R  RESP 

171 
173 

KEYb  5 
FNV (0) 
t'NW  (0) 

UP  DATE:  TEMP,    DEVJ  PT 
WAIT  Q  MILLISLC 

174 
17^ 
176 

F  NZ  (  N  U  ) 
FkL  6 
F  N"v  c  13 

Xi=FNK (NO) *C1*S (NO ,4) * lE-26 

calc  L,B0,E2,G  via  li2  ,  G-d  if  f  =  C7  ,  Ta  =  H9  ,b9 

177 
178 
179 

t  IMV  d  9 
Fula (L) 
FNVd  1 

calc  Ts  via  G  at  zenith  =b2* (D*F/0 , 313) '2 , 82 
c  p    c  '    Ai\.n    HPi-l'jil/min   of    p\t'  c\ 
calc:   G/T,G/Ta,NEF,NUF  errors 

180 
161 
lb2 

FNVd 

E  NV  Q 

KLYq 

3 
4 
2 

calc:    GRAPH   RANGES   for   AUTO  SEQ 
cclc:    LINEAR  &  CSC   E'lT  PARA^:E'I■ERS 
calc: STAR  FLUX  VALU LS , Ta , ef f  area 

183 
184 
185 

E  NEg 
FNFo 
FNEd 

5 
2 
3 

heading  *HPBV;  #1   =.,.+  ...  CSC  L= .  .  .    (ant  HPBVJ  =. 
heading  G/T ,G/Ta, NLF,NUF, Y-f  actor 
head ing  Kl,...K9,K.A-eff, R-ef f ,S ,Xi 

.  . ) 

186 
187 
188 

FNE  d 
FNVd 
F  UF  d 

6 
11 
10 

heading:   G(aB)    G-diff  T(K)   Ta(K)   Y-fac  HPBWerr 
loaa  PIOR  SUMMARY  MAT  M,   MAT  N 

prt  A2,C9,D1,N(21,1) ,T(1,9),C8,D8,D9,J1,N(21,3) 

oata  fit  c(l-K2) 
,T(1,11)  ,C2 

189 
190 
191 

E  NFd 
KEYd 
KCYq 

9 
4 
6 

prt  Kl,K2,K3,K6,K8,K9,K,A-eff,F-eff,S,Xi 
prt:   G/T  DATA  SUMMARY  with  page  heading 
prt:   G/T  DATA  SUMMARY   (no  heading) 

192 
193 
194 

FNFa 
F  Nt  d 
KEYe 

1 
7 
9 

ques   DATA  Oh  TAPE/DISK , TAPE  # 
ques:    DATA  SETf 

ques:    NEW  FRLQ, BW , INPUT  ATTN,SIML  STAR  NOISE 

1S5 
196 

E  NVd 
F  wV  d 

6 
10 

read:   Rv;rk#  ,SET,  f  ,  T/Ta(390  ,  esc ,  HPbK   90  ,  esc ,  Ta 
set  FLAG  t8   if  RE^-ORK*    not  integer 

148 


8.     COMPUTER  PROGRAM  LISTINGS 

In  this  section,   the  flow  diagram  for  the  computer  program  is  printed 
followed  by  a  listing  of  the  program.     Following  the  program  listing  is  a  cross 
reference  list  of  the  program  constants  and  of  all  the  line  numbers  where  these 
constants  occur.     The  meanings  of  the  program  constants  are  given  in  section  7. 

The  numbers  circled  on  the  flow  diagrams  are  the  "R"  numbers.     For  example, 
405  corresponds  to  the  location  in  the  computer  program  of  the  line  where  R  =  405 
occurs.     The  purpose  for  the  R  numbers  is  to  label  program  segments  in  the 
computer  listings;  and,  in  the  case  of  a  hardware  or  a  software  hangup,  to  be 
able  to  identify  which  part  of  the  program  was  being  executed  at  the  time  of  the 
hangup.     To  obtain  this  identity,  the  current  value  of  R  is  examined  using  the 
computer  keyboard  command  R,  "EXECUTE." 
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8.1    X  -  SUBROUTINES 


6  9  I J  ij  T  iJ     J  'J  0  . 

70  DEF  FN:''.  Q'  '   '  - 

80  FOFNfiT  B 

90  NPITE    ■  4j  SO  N'JE'/TEij; 

100  NRIT  100 

lie  RETURN  0 

120  HEF  FNR(a  ' 

122   IF  Q-4  THEN  14;:: 

124  URIT  40 

130  ENTER  •iN*.Ql,Q 

140  RETURN  Q 

142  RETURN  REVTEJ 

150  DEF  FNIKO::. 

160  IF  Q  THEN  ISO 

170  F E T U R H  r N ■: t y.  +  F r i C 7 F  ii ' : ■ '  .:'  i  : 4 : : : 

1 S0  c-FH::vSS+FN;^^23-i-FN:-:  1 0::; i-r ri! i-; ■■-:'+ \- 
1 9 0  y = F N Y. b s  -t  F  N : : 2: 9 + f  n  :^  1  u  ^  -  i ; n ':;. \  ■ 

Zm  RETURN  0 

210  DEF  FNPCQ/ 

220  IF  E2  :>=■  0  THEN  240 

230  E2=0 

240  IF  E2<16  THEN  260 

250  E2-^15 

260  IF  Q>2  THEN  440 

270  ',' 7  =  F H X 6 7  +  F N i 6 3  +  F  i  R  '  f  '-\  t" 2  '  -i •  F \  I : 

230  V3  =  FH:^:69  +  FHW4:::0  +  Fh2::: 

298  V  9 = F  N  V,  (  6  7'  - 1:  2  ::■  +  F  N  :  ■ : '  r  i  .i :  .■.;'!  .  ',  '  ]  i 

300  V  3  =  F  H ( 3  i  -i'  2  0 -i-  F  N : :  b : '  +■  r  ■  r  i  N  4  >  9  <-  . 

310  IF  H  B   ':: ' ,'  7  + ' , '  3  +■ ' , '  9  ::■  >  It '^7  O  T  !■  1 1  \\  - 

320  Qi^-VS-ri:  2*','-V3::' 

330  Q2  =  ','9* 2*'v'-V9 ) 

340  Q3=  ( 1  -C2+C2*h3 ::■  *Q2 

350  IF  I J 1  :>  0.096  0  R  C!  2  ::■  0 .  0  b  T  i-i  E  N 

360  E2=E2-1 

370  IF  Ql< 0.132  HND  02:0.132  THEi 

3S0  E2  =  E2-:-l 

390  RETURN  01   vOS Ql:- 

400  PRINT   "REZERO"  ' 

410  E2=E2+i 

420  Q  1  ^  F 1 1 :  ■'  t.  2  -  £  2  :■  1-  -  N  iuj  -i  f-  N  i::  1 

430  GOTO  220 

440  v  7 = F  t  i ;: :  6  s  ■  I F  N : :  1 0 1  T  r  N '  2-:  7  i- 1  N  i-'i  6  0  ■ 

450  V  8  --  F  N  y,  6  9 + F  N  W  4  6  0  +  F  i  i  f :  2 

460  V 9 = F H y e 8 + F N W 4 6 0 + F I r  2 

470  \> =F\\ :  ■:  ]  0  3  -1 F  N  y  2  2^  -i-  F  N ;  .1  ■ ;  r. :  j  ;  ,  N 

430  IF  fl S c '■  ■' 7  + ' ,' 3  +  V 1 1:::  i- . u   I ' 1 1 

490  Q 1  =  (  V7+V9 ■  2- V3 

560  RETURN  Q  U  s  2-.  V -Q  l  :>  ,.-5 


r  r'h 
■FN:' 


1 1 1  -i-FN':2^ 


"NNl  00 


-i:  ;:i+fn:^^j 


N:  :2  ?'  +  FtiR4  60  +  FNR 


■RNR2 

NR2:;'/; 
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X  -  SUBROUTINES  Ccont) 


510  BEF  f HH'  MO  • 

549  E9=(  (El+H  -Lt:  -■-  2-4  :  - 

55U   IF  TCHyf.21  ]-0  THl.,     .  _ 

560  E=>[  ^^^^2       El  -H/'  t  i  L        i  i  J.  xu.-j- 

570  ijJTO  650 

580  F3-E9+Cb*i4/360 

590  IF_E9        24.0657O-:^x-  THEfi  5lU 

600  GOTO  6  30 

610  b?=E'3-24 

620  GOTO  590 

630  E3=E9^360^24 

640  E  =  E9  +  360-S[  (JO- 3  ]-C4 

658  IF  E   >=  360  THEN  670 

660  GOTO  690 

670  E=E-360 

680  GOTO  650 

690  Q=3LN0:.3]+T[Ha.2i  j^El^TlU--  13  J.-  lOOO^Ll+Bl 
700  L=S I HC5*S  I NQ+C0SC5*L-:  :E 
710  L=fiTM  (. L/SGF: <  1  -L*L*  1 E -  .- 

720  H = S I  r  i  Q  C  Li  S  C  5  -  C  0  S  L  -  T  H  f      i  H !  i  L 

730  H=hT!I(3uR':  1-H*ri>-  <R  +  iE-93.^  >-r3^^HTrUE  +  99*';a-:  O  J 

740  IF  E  <=  -ISO  THEtj  733 

750  IF  E  <=  0  THEH  820 

760  IF  E         ISO  THEH  730 

770  GOTO  790 

730  h=360-R 

790  IF  T[H0j21j=0  THEH  020 
800  Q=TCH8j  13].- 1030 

810  L=L-flTH  (  COSL*S  I  HQ--  <  1  -S I  hL     1 1\9  '> 

820  Q=L0=L 

840  FOR  1=1  TO  4 

850  O0=(L3.--THNQ-L9/<THHQt2  :■  .'.-60 

860  Q=Q0+L 

370  NEXT  I 

330  L=Q 

390  RETURN  H 

900  DEF  FNB(Q> 

910  FOR  1=1  TO  Q 

920  BEEP 

930  WRIT  flBS<l@e*<I-4>> 

940  NEXT  I 

950  RETURN  0 

960  BEF  FNNfQ) 

970  DISP  •'<  =NC>:  '  IQ, 

980  IMPUT  B$ 

990  I-  ef[ljlJ="   •■  THEN  1010 
1003  RETURN  VHL(.Bt> 
1010  RETURN  Q 
1020  LEF  FNICQ) 

1030  Rt="-  ====####i?Ow0" 

1 040  H  *-  =  R$[  4? U-3 ?  4*Q  ] 
1050  Hf[5>RI 
1060   fi4[9]  =  R:? 
1070  FORMhT  F5. 1 

lOSO  WRITE  '::i5jlO70>H*?H+'n4ir;-f;fi^ 
1090  RETURN  0 
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X  -  SUBROUTINES  (cont) 


1  1  iJ0 

DEF  FHK(Nu:. 

1 120 

■^TEXFaj=  1 1  1  * 

!  f-|[  4  ]  ■  1  !,;• in,;. , 

i'8>    ■/■"*^  fiC  3  j/i 

1 1  3  0 

21  I.'    1  +  0.  2'-^ 

i      -c  ■■!•  :  'i          '  ■, 

1 1 4  0 

(  i;Fi[  3  ]  IM  - 

1 1'^^e 

44E  03*^ 1 -n 

.  022 '■'.2 ■■'■00 ;  ■!'  1 

ii„  52^*^iG2-|-2.  73-G 

1  IbU 

0-1--0., 

022 1 5* (  1  1  =  M 

2  Gu  '  '-i'/i 

1 1  7  0 

45/02+ l  -i;!i 

■■'  G.  '\  7 ,  7  7  3 

1 1 80 

Q=  (  1  +  493 ,  3  / F  T  2 )  ( 

I  ,  :/  p  \  j 

1  1 9  0 

G5=l . 4 

5 1 E  ■i-05-^:'  ( 1  -0 

.  0225,:^*G0  .■'  ■l': 

,  2d2-*GKP  ( -644* 

1  ■"'  M  fl 

L  5  J  .  0 

9  +  0.  2  7* (  1-/J 

1210 

G  £  2 .  5 

29E'-02*'  1-0 

.  i;i ::';::;!  5  2  ■^H  jG  i  -i  ■;: 

.  2G2-*f-  •t^2  /  ( 1  /  02 

1  £20 

LF  =  £,  1 

1  2 '  ■■'  i'i 

"7  1  -  r  ^1  .f. 

L4+05*L5+Gn 

:■■■  1...  C 

1240 

( 0 .  9  2: 2  7  :f  1.;  1  - 

C-^    \?\  2    i-;  j    ]■■■;  i; "|  ■;.  i- 

5  ^  2  5  ;■■,  ■■!■■  0 .  02  0  2  *  L 

1250 

L  9  -  0 .  0 

13 

1200 

!:  1  =  10  i 

(-Z1.-  10/SlN 

1270 

.•■■Q2-:-c.  1-4:  1  ■  - 

1230 

02=  (ii: 

M0 II  9  ]  -  1  00 

1240 

1 2: 0  0 

1  3 1  0 

ni(W.-F 

/2E  +  03':i  T2 

1320 

K4=  1 

1330 

K5=l 

1340 

Kfa  =  1 

1350 

K7  =  l 

1360 

.1 1  =  1  0  t 

('  -0 .  000 1  1 

■4-'  -  S  IMG.' 

1370 

1300 

K3=l-; 
0=1 -i-  (2 

1-  Jl  :.'*E/P^  - 
.  904E  04) 

1     -2*X.\}  1  riNL 

)  /( GIUL) ■t  / 

1390 

3=1/0 

1400 

1-3  :'*EKP(-0 

.  4£7-*-02 

1 4  1  0 

K-Kl 

2*K3*K4*K5-v 

1420 

PFTUM- 

K 

1430 

DEF  Fh 

U iJ 

1 4  40 

UNIT  G 

1450 

PET0R0  0 

1400 

DEF  Fl' 

Z<N0)  =  rHI\'.ri 

G' .-'  ■■':  iG  1  :'■■  ;:>  i,  G0  j  ■■ 

„i-^'GI.:2^^''.:6 
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X  -  SUBROUTINES  Ccont) 


1479  BEF  fHC'fi 
1-30  H5=H5-: 

j         3TBI3=6  THEN  - 
1^-^  :=FHR3 

1529  IF  Q<10ty  THEN  157%! 

1530  FRIHT 

1540  BISP  "CLOCK  RESET" t 
1558  IHPUT  lai 
1560  GOTO  1490 
15?a  FORMBI  20;  .      7-   ,F5.0  : 

1539  I4RITE  <15j  1 57B>Q  1*1  et3nr  i NT < u -■  i 8 T 4 1-  *  I NTQ^  1 89- 1       ^ HJ c  fi/- 1  fi f  4  > 
1590  a=2a 
leee  friht  H*r': 

1610  FRIHT 
162H  FRINT 

13??  -3FilHT  35"-'^-.?-    -   ..'^  ■'^^--,6iy,"RUH%F3.0 
--'HE  <15.  -  ■:  -  HI  i.4:ijH6 

=;SHhT  "      .   ^-?.3.  '  — 
PRIHT 

FORiIRT  20K-"FRCG     -^Fi.     -  ^- 
WRITE  <i5?  i67e>PjT43?2.  :  .pi[21] 
3?  IF  FLRG9  THEH 

17B0  PRIHT  TfiB(Q>?Pf£i,::- :-  '"  ?  P^E  9-.  12 "  ".;?*■[  4,  j;  ■•  -JF/rT^S]! 
718  WRITE  (15?  165"^ 

^729  FORMRT  13K5F?,;^  .    -  llIsH" 

i73@  WRITE  <15j 1733  -  -  I. 
[740  IF  FLHG8  THEH  1778 

"3  -3RflHT  iSK.-QyJc  3- T" . .  ^  :2,.  2?  "  dB-- K "  ^  F7.    =  '  cB^K"' 

??  --"HE  <15j  i75H>io«LGT<G^"Hy>?  IfeLGI^G^^Ti. 
-3IHT 
1780  RETURN  6 
1790  DEF  FNSCQ> 
1800  FOR  l-i  TO  Q 
1810  PRINT 
1820  NEKT  I 
1830  RETURN  & 
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X  -  SUBROUTINES  Ccont) 


¥.$  50  1600 
FNX 


70 

170 

i  ■;•'!.■■! 

1         ;i  70      1  n 

130  130 

1  £:0 

1  '9 10       1  9  0 

190 

190 

i  90 

2  7 10       2?'3  £70 

?'  7  0 

2  8  Q       2  9  0 

470  4;-'0 

2  '-> 

300 

3  03 

420       443  4h0 

440  450 

430 

70 

90 

120 

122       130  130 

140  150 

160 

130  210 

270 

2 ';;)  0 

:;:'0S         33i,!  730 

3  0  0 

9 1  ID       8 1 0 

820 

350 

3  "i  '■■ ! 

3f7.j       o3ii  [njij 

9 1  0       9  S  0 

1010  102 

1040 

1040 

1 130 

1  !  :3:i       J  l',;0       ■;.  170 

1170  1139 

i  190 

1310  133 

1390 

1430 

1  4  4  >.!■ 

14:'0        149  0  1-190 

1530  153 

1590 

1700 

i  7  9  0 

1300 

120 

130 

1  3  ti 

].  9y      2i-'ti      2a  u 

2  9  0      3  0  0 

4  40 

450  460 

470 

1510 

130 

3  2  0 

3  5  0 

420  490 

500 

500  155 

F41R 

Ql 

1530 

FHIi       150  420  420 

F  N  N       1  El  0  1  '4  0       1 99       2  7'  9       2  3  3       29  Q      ;3  0  0      448      45  0       4'  6  0       4  7  0 
1430 

V  190  320       330      470  500 

FHP  210 

E2        220  230       243       250       270       360      360      333       383       413  410 
420 

V?  ■       270  290       300      310      4~!.u       433  493 

V8        230  300       300       310       320       323       453      433  '493 

V9        290  313      ':330      333       463       433  493 

C2        290  340  340 

Q2        333  343       353      378       1140     1153     1163     1173     1190     1193  1200 

1210  1243     1270     1233     h,:90     1290     1373  1433 

Q3        340  393 

H3  340 

FHFl  510 

Ho        513  538       553      563      5b3      643      693      690       690       790  380 

1133  1233     1463     1460     14  63 

ES        533  540 

S[ ]       530  563       640      693       14  63 

[■9        540  530       530       590       o  J  3      610      630      633  640 

El         5  4  3  5  (::■  0       G  9  0 

H  548  563 

T[  ]       553  563       690       6''''0       790       333  1233 

E  563  640       650      6i'0       r.7i.i      T'tiO      743    .  750  760 
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X  -  SUBROUTINES  (cont) 


560 

640 

C6 

580 

Li 

690 

Bl 

6-3e 

L 

760 

-10 

M~a  ^ 

O-Z'tA 

T 
1 

O'tO 

•Z-'?Cl 

O  =  'i, 

0-_it! 

L  y 

C= -SO 

1  c-oU 

FHE 

980 

FHN 

960 

B$ 

9£3 

990 

FtJl 

1820 

H* 

1039 

1940 

cui-- 

1  it  Ci 

1  -? 
L  : 

1  i  "-•11 

1  1  "-'Ti 
1  1  t-l 

i  i  o*:^ 

i  X  ilt' 

1  i  CO 

1    ^     S  i-j 

i  1  ^"L" 

c 
1 

I  1  -i=ri 

I I  -rH 

1  il  ■-> 

t-tJ 

1  1  —  r- 

i  -1 
L4 

1  1  i  O 

1  i-r-y 

i  £_  -_■  U 

i  ^ 

L-J 

1  -'TiO 

1 i  r-i 
1  il  1 1) 

1  -Z'Z'-'-i 

L6 

1220 

1238 

1261::= 

M 

1  c,  _  L 

E:4 

1270 

B 

13£0 

.330  1330 


810 


bin 


3 1  0 


310 


.0       7SU       f'Sy  390 


300  1920 


1  J3U 


.=60     1960     1036     iS30     1030  1089 


124h 


1210     1310     1360     1360  1738 
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X  -  SUBROUTINES  Ccont) 


K2  1290  1410 
K3  1300  I41y 
U  1  3 1  0 


f:4 

1920 

1 4  i  fi 

r  b 

loJO 

1  4- 1  u 

Kb 

1340 

1  4 1 0 

K7 

lobO 

1  '^1  1  !J 

.J  1 

1  -!hO 

1370 

1370 

1  4 1  iJ 

1390 

1  40  0 

K9 

1  4'  0  0 

1  4 1  Si 

K 

1  4  1 0 

1  423 

FHZ 

14  60 

C 1 

1460 

FNC 

1470 

N5 

1  430 

1480 

FHS 

1490 

1790 

h* 

N[  ] 

1  6  0  01 
1640 

H6 

1  640 

?$ 

1630 

1630 

C 
D 

1 7 1 0 
1730 

G 

1760 

|-!9 

1760 

1760 
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8.2     E  -  EQUIP  CHECK 


CHANNEL  VOLTAGE 
CHECKS 


(508) 


ATTENUATOR 
CHECK 


STABILITY 
LINEARITY  CHECK 
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E  -  EQUIP  CHECK  (cont) 


37fiy 

P  "  5  0  0 

'■■  S  ■?  f  i 

LISP  "PPGM: 

^■,  =  F':-:'  r   Ti  l'      ''i  1         i  r    i  .  ■ 

T  iRPF"; 

o'-iuy 

IMPUl  y 

3  9 1 Q 

PPIMT  0 

39£y 

LORD     KP'i'  # 

"  '  -  2' 

3  9  3  y 
3940 

Q^PF3 

riEPGE  #Cn4> 

50-50 

39Cy 

f^^="^iPSlE.  i 

3  ■■■  Ii5^  ;"!"!'■■     FRIJ  j  'p  i-i-lR:' 

F     ~  1  -FO " 

39bo 

LOflP  HRVh 

ttPE  S  N 

3  9  b  1 ' 

PE::i.jlMr:  fiPL'-. 

3970 

DIM  H::r[72]- 

p  f  [  1  i  1 :  III ,    s  ,  F  V  ; 

25  i -  F  ■  - 

"S  :  1  -.L  .  f 

3930 

P-R-Hl-:fl2-C 

.  r    .:p4  =  rN:  [::,:; 

r  f  'H 

■J 

5  9  9  0 

H=I  =  i5=^I6  =  J 

-Jl-N  ^NJ  ■  f-i.::  ■  i:    !■!    '    ■  ' 

;  -  M5  =  N6-^0:  -J 

4000 

p.:Fy=pi=^p:;  = 

:;-i  i4-fvl=^R  -  ^-F 

:::::Th^  r 

4  0  1  0 

./  f ;  =  V  9  -  Q 

4  0  3  0 

4  =  ^ 

0 

4023 

R3= 1 y  1  ( N[  1 3 

-  ly     lu  ' 

4024 

Hy  =  N[  18-  10  ] 

403U 

63  =  r'y 

4032 

C9^5. 3 

4034 

H--=3.  5 

4040 

F=:7 

 -   ..  ... 

4050 

E2^1 

4060 
4070 
4080 
4090 

Li  =  60 
T-100 

Pt[  1-12  ]="  " 

■  -  - 

4  1  00 

3FLHG  9 

4110 

Q^FN jy 

4120 

STOP 

4122 

BEF  FNF<Q,> 

4126 

G  0 r  1 J  8500 

4130 

R"50 1 

4140 

DEF  FHV':R  '-^^ 

FN:'(3i  -  !  W)  I  'l   -i-FNi-v:  111- 

( R  I NTQ  .>  *  1  00 

)-rFNNlt 

yy tFNRS 

4  1  50 

R=-5y2 

4160 

DEF  FMJ'Q' 

4  1  70 

GOTO  0  OF  4 

530)  ^  i  S  3  0  '  '  ■  1  i"! "  5  8  2  0  -  5 

■  7y} ::  S560  -  9509 

-  A  1  S  0  -  -i- 

y 

4130 

Pf[  13  ]="KE't 

0:     CFl!':K  list  hNH  \ 

I'i  LIST" 

4190 

Q-FNS2 

4200 

R=5y5 

4202 

F2=^0 

4204 

STRNDRRD 

4210 

DI::;P  "0-KE'i 

LIST-     HN  Vn  CK/' ; 

4220 

Q=FNB2+FHN1 

4230 

GOTO  Q  OF  4466                      '  " 

4240 

PRINT 

4250 

PRINT 

4260 

H-l  8 

4270 

PRINT  TRPh' 

4230 

PRINT  TRPH' 

FE'i    1:   CHECK  i...ISr" 

4  2  9  0 

PRINT  TRpy 

4300 

PRINT  TRBh' 

\  E'{  3:   i  'li-iN    i  \{f\\\tf  i 

■■'i!  TRCES" 

4310 

PRINT  TRBR' 

FEY  4=   1,  NEiF  ynCNi':' 

4320 

PRINT  TholV 

hEV  5:    l  ilKlF  ILH'-    !  I'i 

•F   IV  RiTEM 

stmd  H 

I  ! 't'  " 

4322 

PRINT  TRBR' 

FEY  I-,.:               Nul  .:.  Ti 

ST  hp  1  CITY" 

4324 

PRINT  TRBh' 

f.:E','  :  ;    CNRN',1    STiril  l,! 

i'  hTTFNCHTMi 

vRCi.lC ' 

4328 
4330 

PRINT  TRBR' 
y^FN:2 

F,EY  y:   NlN  f  Ff  0,  FN- 

ilihUT    M  "  iN:. 

.;INL  Si 

Fr:  r-OIS 

4340 

GOTO  4210 
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E  -  EQUIP  CHECK  (cont) 


4:?5y  R  =  5y4 

4370  EISP   ■■RUN  #"! 

43oG  H6 -r  mB5  tF hUHo 

43?U  mSP    'FILTEP  FRLk-  I'liii.y'j 

4400  C8=FNHC3 

4405  h3-  1 0  r  ( N[  1 3 '  5-!- C3  49     5  ]   1 0 
4407  fl3  =  H[  IS:' ?+0::3.:  -r7  j 
4410  DI3P  "FILTER  SflNDPrr  .3 ^  i  lH::  > "  ? 
4420  Cy-FNHC? 

4430  DISP  ■■INPUT  fiTTN  ■:  dP  V" ; 
4440  E6=FNNEe 

4450  riI3P   "SIMUL  STAR  NU  I SE Ji  : ■  ? 
4^160  n  =  FNfU-l  +  FHS3 

4464  RETUPri  0 
44bb  R  =  504,  1 
4467  F2=l 

4465  IiI3P   'TiU  CHECK  LIS!"  :i-  jjVfl  (U-"NO>"? 
446 ■?  INPUT  Q 

4470  IF  Q  =  0  1_HEH  447S 
4476  Q = F  N  J 1  +  F  H  3  6  +  F  N  J  2 

4473  Q = F  N  3  4 + F  r  T  J  3 + F  N  3  9  -i-  i "  N  J  4 + F  N  -  J  5  w  1 1-  F  H  'E:  3  ^  F  N  J  5 + F  r  -i .  J  6  +  F  N  J : 

4480  DISP  "CONNECT  EARTH  TERM? SET  PWR  LEVEL"; 

4490  Q=FNB3+FNN1 

4500  Q=FNS5+FNJ6. 1 

4510  STOP 

4530  R=506 

4540  DISP  "PRINT  RLL  iJN"  ; 
4550  INPUT  fl* 

4560  PRINT  "8  fiC  PWR  SWi'TRFS  ON "5 
4570  INPUT 

4580  PRINT  "DflNfi:   EXT  PRTE  FULL  CCW'S 
4590  INPUT  fl* 

4600  PRINT  ■■DRNh:   DhTR  OUTPUT  BUTTON  IN"; 
4610  INPUT 

4620  PRINT  "DflNfl:   P R 0 G R H N  C ON T R 0 L  B U T T 0 N  I N " ? 
4630  INPUT  m 

4640  PRINT  "RF  UNIT:  E-flNDPflSS/FREQ  0  5 .  3l1z/70MHr "  " 

4650  INPUT  fl* 

4655  E6  =  INT(HBSNC 1 . 7  J) 

4660  PRINT  "RF  UNIT:   flTTEN  SET  T0"?E6;"dE"; 
4670  INPUT  fl* 

4672  PRINT  "RF  UNIT:   Sill  SThR  NOISE  0  3.5'dE"; 
4674   INPUT  H$_ 

4630  P  R I  f-l  T   "  R  h   U N I T :      L  1 1 1<  K  M  N  u L  K 1 "  ? 
4690  INPUT  fl$ 

4700  PRINT  "NOISE  SOURCE  CONNECTED  TO  RF  INPUT"? 
4710   INPUT  H* 
4712  Q=FND0 

4720  PRINT  ■■RF  UNIT:  uUTPiJ  f  NLIER  \S  ■' iJ  0*SGNM[  1  ? "?  Jr  < 
4730  INPUT  m 

4740  PRINT  "CLOCK  UNIT"   SET  IiUTE^^; 
4750  INPUT  HT 

4760  PRINT  "CLOCK  UNIT:   SET  GH T  TIME"; 

4770   INPUT  ht 

4730  DISP  "END" 

4790  PRINT 

4800  PRINT 

4810  RETURN  O 

4320  STOP 
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E  -  EQUIP  CHECK  (cont) 


A  S  3  0 

K  ■■-  0  K:  ' 

4  3  ■ '  M 

F-'  ¥  1.  1  ■;; 

T  .....  "  I.'  l"  '.  .1       ■"■  ;i 

3  Fl  i" 

L  .[  3 1  1  riL 

1  iUE T  [  M 

Z  T  F 

A  3 -  ■'3 

Ij     I-  r-  j  i_ 

P  ■'  i  i,  i  pi  "i"  ■  t  1 

■  .  i--3'i'  ^,.3,. 

4  3  3  f '1 

PR  I  3  T 

"  liVM    P  3i-l3 

!, :' ;  PlL  ' ' 

"x  03 T" 

4  3  7  0 

I  33  J  T 

Fi 

4830 

Q.rFr!;: 

4  3  9  0 

R I  ri  1 

"  iJ'','  I'l  F"  '.J'3L' 

1  0  N    1  i 

J  i:  j  ;    p  i.  [.  ! 

J  Pi  5 

4900 

I M  P  li  1 

Pi  i 

4910 

P  i,J  \\  i 

-■0  T3  4 

4  9  il  0 

\'  i':  111  ■ 

1  3  [  '..  -.J  ~  i  '1 

i  !  i  'l  1    T      r  . 
V  1.1  L  !  ' 

I'-lMCE  "  FFi 

,'  '  L  '  '  h 

Fi  I  'l  C 

4  9  0 

r  P.  1:1  1 

4940 

IHPUl 

FI* 

4950 

NEXT 

i 

4960 

PR  I  Ml 

■'  RUTO-VOi 

E"..  FN  V 

"EhHG 

E  i 

4970 

FOR  J 

=  1  TO  5 

4930 

PPIN'- 

4  9  9  0 

NEXT' 

I 

5000 

DiSP 

"EHri" ; 

5010 

RETUF 

\\  0 

5020 

k  -■  5i  0 

5  0  3  0 

PJ[  IC 

;:i=:"PEV  4: 

3HECK 

nTTEH33]' 

5  0  4  0 

9 F  N I 

5050 

F3^1 

5060 

5070 

5030 

R  =  33 

5  0  4  0 

THEI-I  5130 

5100 

'■0  =  XTTiL.?  1  = 

5 1  1  3 

i3  4i-FHNl  'i  FN 

J 

5]  43 

D  I  F 

■'#  REPPFiT 

■■31::  nPf 

3  '3ET " ! 

5  1  '-ifi 

H-Filt 

;2  +  FNNH 
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E  -  EQUIP  CHECK  (cont) 


5180  R=51U 

51':^0  GOSIJB  5620 

52Fi0  P0  =  F' 

5210  Q-^^  Fl  l  ■  ■■:^F^!22■■H■-NF^^^K^^22 

5  2: 2'  F)   i  F  F  :•  T  H  E;  ;  J  '3  2  6  0 

52  20  FiJRi'iril    2:2^  "CF','S  i  r.i    !::^U  ri  'iiV^^"  . 

r  :i;    ■  •'  VOLTS 

52m 0  WRITE     15h  5220)r'O?  S'i  ri  1 

5250  LUTU  b2oy 

5260  FORilST   32.  "i'lBS  T':'FE   IV  ijii T  Pi 

!  i  "  ^  2  9. S« "  MH  + 

5270  NRITE   a  5  5260  )  F'O  2  h  hi 

5230  Gu3US  5201;;: 

5220  F  0  R ;  ■  i  ri  J  2 ;  2.  ' '  'o  F 1)  f ;  F  :  "   F  6 .-.  3   "  . 

5200  FJRITE  Fl5?52y0;>Q 

5310  PRINT 

5320  PRINT 

5  2: 2  0  F  R I N  T   ' '  12  Fi  T  T 1 1       i'RQn  h>  '  U  # 

■ftl   F-T?H  OR  ',' 

5340  PRINT   ■'       ttl   Pl.lK/#2  PilR" 

5350  PRINT   "                   PRGM  FVITN  #. 

:       #2  F'NR  OR  V' 

5360  PRINT   '■           NONIiJFiL  tfl/tt2'' 

5370  PRINT 

5380  PRINT 

5390  FOR  hi=0  TO  8 

5400  IF  F2  =  0  Ti-iEN  5420 

5410  IF  hi   THEH  5590 

5420  IF  Hi  =3  OR  Hi ---5  OR  fll^--'7  THE 

..;    5    ■-:!  ij 

5430  FOR  fl2=l  TO  15 

544)3  Q  =  FN2;Ft3--Hl 

5450  GuSUB  5620 

54r,i;i  pi=p 

5470  Sl=--S 

5480  Q=FN2(b3-fl2) 

5490  GuSUt^  5620 

5500  P2-F 

5510  82=8 

5520  G0SU2  5S00 

5530  FORF:.-T  F3.  O^  "   Db'  ^  i-  ,2,  y  ^  '  ijH 

■^Fi  -:.5j"  +-",F 

5540  WRITr   (15:i5530>F6  211   F '  ^  21, 

1  O  -i'  Lj2T',:F0/T--1  i ,  j 

5550  FORMOT  Fl2.  8'  "   LL;  '  ^  F' 1  2  ,  2. 

  ,  r:5^  2?  "       ?  F 

5560  p\  F::  I  r  F::   ( ].  5  ?  5  5  5  O )  F'i  2 ,  P  2  ■  S  2  :■  2i  ?  f  i 

2  -  0 1 

5520  PRINT 

5530  NEXT  h2 

5590  NEXT  Hi 

5600  U-FH88 

5610  RETORN  0 

5620  R^511 

56:;0  REM  **^:*PHR:    F3^-.1  FOR  22'ii-iL 

]iLT>     F3==l  EOF 

5640  S  =  M:-V1=0 

5650  IF  F3^:-0  THEN  5670 

5660  Q^^^FNIH 

56;-0  FOR   I:=l   TO  N 

5620   IF  F2  1  HEN  5 ■■'20 

5690  NMll  50 

5700  P5--FNV  (  4  =  05 ) 

5710  GOTO  5730 

5720  F5=^FNP3 

5730  Fi-^fl  i  f  5 

5740  '■■4=-Vl+p5^;fp5 

57S0  NF2:i  I 

5  220  P-  H  N 

5."  n   IF   ir^l    ifJ|,.|J  '-79ii 

5.     i  2^-1  y  >  ':-k\'<    VI   H  -  ii  n  ■'    ■  -i    i  • .: 
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E  -  Equip  CHECK  Ccont) 


5!JViu  F?-5 1.2  '        '  ■• 

53 1 H  Ptfi  1    Tie  CriLLUri    U-.iif  K    ill  I   I'B  =  Q 

53 3 W  Z=P 

53 3 y  U-FN>-;6t: 

53 4 u  G03UE;  5330 

5 3;  5 U  0  F  r -I :  i ':i  -  1  o  -d.  i".  f  ( r"'  ■ '  3  ;•  i ■  1 1. 1  i  r;;  "i  { j.  •  r',  j  ■ 
5860  r:3TUFM 
5370  F-.513 

5330  F?L1 3  ]=  ■■  FEY  5  :     CHFCK  I'vih  ■>  I..  I  Hi  ri;-  i  ty  ,  sThB  OF  T'i'PE 

5832  F8==^:L0-'r<r:--IfirQ 

5390  C3=3 

5300  Tl^F-riP3 

5310  Q^FHIiO  +  FHEl 

5320  Fi=F5=-2 

5930  F7=^l 

5940  F6=12 

5950  15=0.01 

5930  H3=5  ■  3 

5932  Hl=0 
5934  fl2=l 

5970  IF  F3==0  THEN  3000 
5975  Fl=F5-0 
5990  R=514 

6000  IF  F2  THEM  6480 

6010  niSP   "0=^PPT  Ft.JR;i;V'3?   2=^GRRPH  F  NR  RRTIO"; 
6820  Fi  =  FNB3  +  FFiHFl 
6030  IF  F1=^0  THEN  62  SO 

6040  D 1 3P   "  PPH  LE  "'EL  :  fl  =  i.  uNST  h  1  =^STE PPED " ; 

6050  F7=FMNF7 

6060  IF  F:'  =  0  then  6090 

6070  F6=l 

6080  GOTO  6110 

6090  DISP  "MEFl3:0^^T-'Ri.M  H  I !  iP.  1 --STli  i-iT  i  N' ; 
6100  F3:::FrifiF6 
61 10  H 1=0 
6120  Fi2=l 

6130   TP  F6  THEN  3170 

6140  riI3P   "tM.  L.EVELjvF-  EE-E;..,.  ^  pRGN  flTTEfP:'"; 
6150  INPUT  R1?R2 
6160  GOTO  6130 
6170  F6=12 

6130  DISP   "tt  UP  PIERS.  PLOT"; 
6190  N3=FNHN3 

6200  n  I  sp  ■'  shrllest  i.;rhF'H  un  [  r  <  m > " ; 

6210  I5=FNHI5 
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E  -  EQUIP  CHECK  (cont) 


fc23a  Qy=y 
6340  GOTO 

€250  DISP  -PWR  VIH  mi\.£  i,Vd> = 

6260  QO=Fr:H0 

6270  C2^8 

6289  F5=Fi-i-yO 

6290  IF  Q9=0  THEM  oo'-iij 

6300  DISP  "flDS  SOURCE:  0='  ft       ;  >  •  i  ^'  1!  1  /  -  2=<t2>  "  ? 
6310  C3=FhNC3 

6320  DISP  '■  INSERT  €DB  kHEH  ^.  .         .        ■  ^  =YES :  ' ; 
6330  C2=FHNC2 
6340  10=0 

6550  DISP  "INPUT  HlTEH  iW)"^ 

6360  E6=F^ '^Et 

6370  IF  -    -:    - -EH  6425 

6380  DISF     .E:;-...:LflTED  SThF;  r:OISE  Ll£vELc:UEO " ; 
6390  H=FHHH 
6400  FIKE5  4 

6405  DISP    ■STDi";i0*LGTH3r'dB>  ; 

6410  H?=-[ 1,3  3=FHHh3 

6415  E^-  : -RD 

6420  i  :3F     IF  FREQC.I1H2:''  j 

6430  C3=FHHC8 

6440  DISF  "BfiNDWIDTH^MHZJ  I 
6450  C9=FHHC9 
6480  R=515 

6490  Q=FHC2+FNF0+FHS2 
6540  IF  F5>1  THEN  SSSO 

6550  FORMRT  "     HQ.   BRDb  V7  V8  V9  PUR<MW>'" 

6560  NRITE  <15»655fi>"        Ck  ERR  SIGHH" 
6570  PRINT 
65S0  Q=FND1 

6590  H 1 =R2=N=H 1 =N2=P2=y 1 =V2^S=S 1=82-8 

6600  P=FNPC3 

6662  IF  F2  THEM  6650 

6610  Q4=FHR3 

6620  IF  IHT(Q4^10)-INT'  Ti.'l0^=0  THEN  6650 
6630  Q=FNC2+FND0+FHDl 
6640  T1=Q4 
6650  N=H+1 

6660  IF  N.  2-IHT<:N^2>  TiiEN  6710 

6670  Q=FKy67 

6630  N1=N1+1 

6690  Ml=Ml+P 

6700  Vl=Vl+P*F 

6710  IF  Nl=l  THEN  6730 

6720  S=SQR <  < y  1  -M 1  *I1 1  .-'H i  :■  •  M -Mil  ^160 

6730  GOTO  6310 

6740  Q=FNK66 

6750  N2=H2+1 

6760  M2=H2+F 

6770  V2=V2+P*P 

67S0  IF  H3  =  l  THEN  SS^'d 

67y0  b=SQr  ^"  ( v2-' I  -      H.':  ■■■  =  !i2--t  ^  '  - :  03 

eSoO  FGR':rT  F-.    ■      .  - ,  SFlZ.  6^  T ;  1 .  :  ■  F9.  4? 'BB"  ■  F7.  2?  ' 

6810  IF  N>1  THEM  £830 

6820  P2=P 

6830  UPITF  <15?6HU0>H.V.  ^-'         -  -  ■      i  ^H*1h,.LGT::P2.-P>-10:^LGTh3j8 
6840  P2=P 

€S50  IF  N.  2-INTiN.  2>   1 HLH  2 
6860  PRINT 

6862  If  F2  HNB  N.^27  1  MlN  -.^G'i 
6S7n  GOTO  6600 
6872  RhTL'Rh  0 
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E  -  EQUIP  CHECK  (con 


bS'vU  REM  SlHE'il  1  i "  iiKi'il  il 

byfiy  FOF-i'il'iT        i  "#  ;    !,..!■      '     '  ■  v    ,  k'-^  " 

by  1  0  F  JKI'lh  T  F:]: .  U  i  "  M:  i-  'Ki  ii-, " 

6  9  £  Id  F  0  k  i"'  i  I  'i  T  F'  3  .  f  i   ' "  IJ  b  i  I  ■   '1- 1  0 ' ' 

€■  9  5  0  F  Li  f'-:  i  i  h  T  5 ; :  ^  "  I  ■  I  i;:  :■  i !■  !. . ; j '  \    F'  i '  ^- ■  ^ ' 'm  5 

6940    NRITE    <  Tj  •m  /ST::  1  ,  l".  - :, 

6950  IF  Fb  TriFN  Fy.jO 

69 bO  WRITE     1,  J' Fyiyjfii. -i 

6970  GOTO  3990 

6930  RIRITE  t  ij  -  6920  >!i  I 

6990  II  RITE   ( 15?  69  jOMI 

7000  FuRMRT  5Xi"#3  LF'.'L M  "  ?   3 ..  0 ^  " 

7 0 10  F 0 R n H T  5 X ?  ■ ' I. J H IT  F „  4 ?  ' '  D t 

7'0  2  0  M  R I  T  EI   ( i  5  ?  7  d  0  O  ■'  E  6  ■< 

7030  IF  Fb  THEN  7060 

7040  WRITE   C  15?  6910)  hi  2?  3 

7050  60T0  7070 

7060  WRITE  ( 15)  69 20;.' M2f  ' 

7070  WRITE  (■  15;.  7010)  15 

70S0  PRINT 

7  0  9  0  F  U  R  N  Fi  T  5  X  ?  f"  6  =  3  j  4  Y.  ■>  F  G  =  1  m  3  .  1-  :  , 

7100  W R I  r  E  (  1 5  n  7 IJ 9 0  >  ■  ■  2 5  ^  I  5     1  I  ■:■  ^ 

7110  H  +  ^^="  I  ....!.„..!...,  i  .    1  

7120  PR  1 1- IT  ThBSjI'-I? 

7130  N^l 

7140  J  1=0 

71:50  T3-FHR3 

7 1 6  0  G  0  3 !  J  D   7  6  9  0 

7170  R5-R2 

7  ISO  I6  =  R5 

7 1 90  FORflHT   "  #.-  T  I NE  "  ,  2  i  X  h  "  2ER3^=^ "  <  \ 
7200  WRITE     15!.  7190)  If 
7210  i^OTO  7340 
7220  R=jJ7 
7' 230  [•i^H+'l 

7  2  4 1;  1  I  F  r  ■!  :■  2  6  Fi  11  iJ  F  2  -=  1  1 '  Fi  E  !-|  7  3  9  O 

7250  IF  F7=0  THEN  7290 

7260  31==: J  1+1 

72  70  IF  Jl<  16  TliEN  7290 

7  2  8  0  3 1  0 

7290  U~FNX  63  .1 1 ) 

7  i 0 0   i;  F  FF ■  : O  IX' I T  < ! -i  ■ ' 2 FJ ' ■    \\\ E. F!   , ' 3 2 i;? 

731  Fi  PR  I FFF  TF.p::;HFi$ 

7  3  2;  0  G  U  3  L.i  B  7  E  E  E 

7330  R5=(9  +  R5  +  R2;'  /:i  O 

7340  X3=(R2  -  I6)/I5  +  25 

7  3  5  0  1 F  H  B  3  ( F  R  5  -  I  6 )  /  J,  ::>  '  1  fi   F  \  \  IF I  ■!  7 

7360  I6=R5 

7370  WRITE  ..;  15;  7190;.'  i 

7330  IF  X3-::0  OK  :;3>5Fi   iHEX  7360 

7390  ENTER   kE^  --  )0,  T4 

7400  !  r   INT  (T4   1  Fi ;.  -■■];  0':    r  X-]  H/  TFiE 

7410  FORFUiT  F4.u»4F; 

7420  WRIlL  m5?7410.)N-. 

7430  00:-: FN  in 

7440  LiOTO  7430. 


4  7 .  F 


DB 
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E  -  EQUIP  CHECK  (cont) 


74.50 

74  C0 
7470 
74S0 
7  490 
7500 
7510 
7520 
7530 
7540 
7550 
f'560 
7570 
75S0 
7590 
7600 
7610 
7620 
7630 
7640 
7650 
7660 
7670 
7630 
7690 
7  7  0  0 
7710 
7720 
7730 
7740 
7750 
7  6  0 
7770 
7  7  2  0 
r  r  o  'j 
7790 
7  3  0  0 

7304 
7310 
7320 
7  3  3  0 
7  3  4  0 
7350 
73G0 
7370 
7330 
7390 
7900 


FOPHmT  F6.  2^  2'/. 

NR  I  TL  1 5  j  7450  :  [  l  iT  i' 4  !  .::'T  -I*  I ,  i  ■'  \  4.-  !.  01'  4 ) ) 
IF  ::4>1    THEN  75l.y 

I F  ( y.  3  -  y.  4 • ;  0  Fi  H !)       + : ;  ■  i- ;  • '  •  5  q  '  r  Fi  i,,':  i  \  ?  g  5  0 

IF     ;  '3-:  :4    :  0  THf.'[! 
IF     ■        j  '  '  i 

G I J  T  0  7  6  3  0 

F'  0  F:  M  h  T  4  y.  ■<  "  ( 0  F  F  3  '31  i..  [■  . '  f ;  fi  T  :  0  •  ■ ' '  ?  f"  3: "  D 
NRITE   (15.  r56e)R2-::.v, 
G  0  T I J   I  ■  F  3  0 

P  R  I  !4  T   T  B  r  ■■.  3  ?  ' '  + "  ;  T '  R  B  v  3;  3  ■■K'  ■,  43:'  j  ' '  !  ' '  !  'f  fi  13  5  0 . 
GuTU  7630 

P  F'  I N  T  T'  Fi  B  ( 3;  3  -  3  4   ;  ' '    "i  1 R  3 ; :  3  .  ' '    ^ "  5  T  R  B  '3  Fi , 
FORhiRT  F10,  4?  "I'E'  .  F7.  3;.  ^4414  '  ?  F3.  4 
NRITE  (  15,  7620)R3h-^' 
G  0 1 0  7  2  2  0 

PRINT  THB333r  "  +  "  '  THB5a? 

FGRMRT  43!.  "SIGMh  •     >  Fi:-  ,  3:,  "   Jb  ' 

NRITE  (  ISh  7660 js 

G  i  J  T  u  7220 

R^513 

REM  ****  PNR  sue;   P  =  PNR'.   S=-=SIGNFi  131  DE 

S=^M1^M2^V2  =  0 

Q^4-HD1 

FOR  i=l  TO  N3 
i":  =  FH3:  63-Rl-iF6> 
F^FHFCB 
P6^=P 

Ml =M1 +P6 

P -■  F  H  3.  ( 6  3  ~- h  3  +  F  33:' f  i  p  3 

IF  P=0  THEN  7304 

I F    K  F  6  /  P )    ■ '  =  0  1"  H  E'  r  i  7  3:  i3  4 

Rl-10*LGTi:F6 

GOTO  7310 

PRINT   "7304:  F6j  P'  ■!  P6?  P 

M2=4'12  +  R1 

V2-V;:.  +  Rl*Ri 

HE3;T  I 

P-MINJ 

R2=4'i2-4T;i 

IF  M3=l   THEN  73'i0 

3=^  1  0 -LGT   1  ■r3uR  (   V3  R3  -H  li.  Fi3    -  !43-  i  > ) ) 

RETljRH 

0-FH3:6 

RETUFH  0 


1  0  0  < 


4;^:.  F 
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EQUIP  CHECK  (cont) 


79 id  P  =  513 

T'yiU  P$[  15  ]=="f  i- V   "  :      ''  \\f<:Y    i":!--iMi!r::L  i  ; 

7930  OsFNCH+FMruHFUni 

7940  RESTORE  7940 

7950  formht  'iiu  "CHflNiiCL  '?  '::,■>  "vui-UsCE. 

7960  URITE  a5j79':.0) 

7970  Q=FNS2  ■ 

7930  FOR  J"0  TO  10 

7990  RERD  H-$'FilnH2 

8000  GOTO  I H  T  Fi  1 . ■■'  100''   ;  i  j : •:■  i J  2 1?!  • 0  i  0     'i b 0 

S  0 1 0  I J  0  T  0  3  0  8  0 

3020  Fll  =  10  +  FNv7.  09 

3030  GOTO  3030 

8040  Hl=H[ 1>5] 

8050  GOTO  3030 

8060  Q=FHv7.09 

8070  Hl=FliV7.  03-HC  1  j  k  ]■■: FriV? .  07 
8030  0  =  FH'.'(7+J  100:' 
8090  PRINT  Fi4  1  TFiB15j  Qr  TiiL 
8100  Hi="  OK" 

8110  IF  Q-.;h1  +  Fi2  HMD  G-Hl  R2  TiiEll  3140 
8120  HJ-"--HuT  HORMmL  I  " 
8130  Q^FHBB 

8140  PRINT         ThE45j  FN  ^  f]Z 
8150  PRINT 
8160  NEXT  J 
8170  Q=FN310 

8130  DFlTFl  "0=110  OFFSET 0 ?  1 E  05 

8190  BRTH  "  1^1  EMP"  ^  0. '5-.  u.  5 

8200  DfiTH  "2=IiEW  FO I  NT  ^  0 .  5  *  0 .  5 

8210  DhTFi  "3  =  +  20  '■OLTS"  '  20.  0. 

8220  DflTfl  "4=+ 12  V 0LT3 "  ^  1 1 ,.  9  ■  0 .  l 

8230  DhTh  "5-DhC  OOTPUT" j 100< 0. 02 

3240  DRTfl  "6-XTRL  DIODE"- -8. 6125^8. 0125 

8250  DhTR  "7-D/R  REF"  :         h.  01 

8260  DRTH  " S=DPDG  OUTPUT " ?  2 ,5,0. 1 

8270  pRTH   "9  =  SET  FINE  PEF "  ,  300 ,  0 .  :,h35 

8230  LiriTR  "  1 0  =  BRDG        REF  " '  0  ?  0  .  Ou  1 

3290  Q=FM312 

8300  RETURN  0 

3500  R=520 

85 1 0  FORMRT    1  OX   "  3 1 NL  STRR  RT  [  N :  '  ^  F4 ,  1  • 
8520  FORNRT   10X,"IriFUr  HTTii:"<F3.0 
8525  FORMRT  1  OX  -  "  3TIi       i  \  FT  N :  "  F  3  .  3 
8530  NRITE  a5>3510)H?C3 
8540  WRITE   (  15>  3520>E6?  09 
8545  NRITE  H  5  <  8525 )  1 0       I R3  »  nO 
8550  RETURN  0 


hT 


dB 
ii; 
1  ] : 


IF 
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E  -  EQUIP  CHECK  (cont) 


85^a  PfC  1  :  >  r.EY  6: 
85S9  FS=1u*'..^I-IHTQ; 
S5?0  H=3 

Seiy  IF  F2  RND     HOT  F3  THEfi  t-722 
8623  F4=2 

8735  IF  F2  THEN  8722 
8710  DISP  ••l=SiriUL5  2-i:;-.p:i.-i  it^r;-; 
8712  F4=FNB2+FHHF4 
8714  BISP  "^MEBS-^SET'  ? 
8716  H=FHNH+FHD0+FHDl^FS!J-3 
8722  C2=l 
724  P=FHPe 

726  IF  Q-^Q1>0.5  THEN  S?4y 
728  C2=9 

8749  Ft[21  ]="SIMULHTEii  Hdibh  iiDl)  ]>  i  i 
8760  IF  F4=l  THEN  3772 
8779  P$C  21  ]=-EH'^-^  "^  ^    '  - 
8772  U=FNC4+Fr.^  :  -  -  ■  - 

76  P^F--:-----       -    ■-    -  ■: 

"'s  ^1=2'-  : 2-        ^  - 

87S9  F2  =  ri1,:22•rF'[^.^.-^^"  -    :   ^  V 

8782  FORMnl  "  P="jF-.  ■-.  uj"  ?  5H>  "ad-J  #1  =  "  5  F7.  4j  "  j  SX^  "add  #2="  ?  F7,  4?  F4.  8 
8784  WRITE  (15.8722--  ■.■■-z-.-  ,.,|4  iv,eas/set.  =  "  5  N 

5755  IF  <Pi^P-l)  2. : 

5756  F5=l 

87S7  IF  ■::P2^-F-l)<y.l  THEH  3790 
872;:  F6=l 
3729  Q=FHS2 

8860  FORMhT  •'  P<iMbi:.       p+li-2      #Ur=fcl>     ff2<iMH>       #l+#2      #l^tt2       P-Sl  ' 
8810  WRITE  aS'SSey;'  ■        P.  if2        p.a-2        STSck " 

8815  FORHnT  76Kj "dB ' 

8816  WRITE  (15j88i5> 

8817  E2=-l 

8820  N9=H  1 =H2=N3=N4=05=06=N7=-H8=N-'-»=ri8=M  1  =H2=ri3=M4=H5=f1t =H7=R8=H5'-6 
8824  F7=E2=E2+1 

8826  IF  E2=ie  AND  F2=l  THEN  5460 
8828  IF  E2=16  THEN  8772 
8830  FOR  H=l  TO  N 
8832  E2=F7 

8849  C2=1+FHK81+FND1 
8842  IF  F5=0  THEN  8945 
8870  p=FNPi 
8852  E2=F7 

8860  IF  Q2/Q1>0.5  THEH  8390 

8870  C2=9 

8830  P=FHPl 

8832  E2=F7 

8890  H7=N7+P 

8990  n7=M7+Pt2 

3998  Pl=5*cQ3-Ql> 

8910  N3=H3+P1 

8920  N3=H3+Plt2 

8930  H1=N1+5*Q1 

8940  Nl=Nl+25*Ult2 

8945  IF  F6=0  THEH  90bN 

8950  C2=l 

8960  P=FHP2 

8962  E2=F7 
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E  -  EQUIP  CHECK  (cont) 


8971-3  IF  C2/Q],  >0,5  THLH  vuyy  ^  ■ 

S9SU  Cc"0 
899a  F-FHP2 
i3992  E2  =  F7 
9000  H8  =  r-i8  +  P 

9010  N3-Ml3-i-pt2  ^ 

9013  P2^5*(Q3-i:!l  >  ' 

9020  N4=:H4+P2  • 

9030  M4=M4+P2t2  ' 

9040  H1--H1+5*Q1 

9050  Ml=r^U+25*Ql1  2 

9055  IF  <F5+F6)=0  THEM  9210 

9060  C2=l 

9070  P=-rNP0  ^ 

9030  IF  Q 2 / Q 1 > 0.5  THE N  9 1 i 0 
9090  C2=0 
9100  P=FMP0 

9102  E2=F7  •  ^ 

9110  N9=H9  +  P  ' 

9120  i19"h9  +  Pt2  ■. 

9130  05=05+5* (Q3-Q1) 

9140  M5= M 5 + ( 2 5 * ( Q 3 - Q i ) f 2  > 

9150  H1=H1+5*Q1 

9160  Ml=Ml+25*Qlt2 

9162  Q=P1/P2 

9170  0Hv-0b+Q 

9180  i16  =  M6  +  Q*Q 

9190  I-I2=H2+5*Q2 

9200  M2=M2+25*Q2t2 

9210  P:=FHX67  +  FNP3  ■ 

9212  E2=F7 

9220  N1=H1+P 

9230  r1i=Ml  +  Pt2  .  ,  ■ 

9240  P1=FNX66+FHP3 

9250  Q  =  1 0  *  L  G  T  P  P 1 .?  -  1 9  *  [,„  G  T  f-i  3  -      ■      '  ■ 

9260  H0-H0-I  Q 

9270  M0=N0+Qt2 

9275  NEXT  H 

9280  FORMAT  10F3.4. 

9282  Q  =  (  H-  F  5  +  F  6  +  ( \  F  5  -i  ■  F  6  >  #  S ) )  >  1 1 

9290  WR I TE  (15?  9280 )  N 1  / 1!  ?  H2.--H '  M3  -  r  ! '  ri4.  H  ?  05/  H  >  06/H  ?  N7/N  ■>  NS-  H ,  H9/N  ?  N0/H 

9300  FuRMhT  F6  .  2 !  '     "  ^  F6 .  2 ;  "  /;  "  ^  F6 .2 

9301  E-H-1 

9302  Q 1  =  ( M 1  -  H 1 1-  2  /  Q )  /  (.  Q  - 1  !■  ( Q  1 :0 

9303  IF  Q1>0  THEN  9305 

9304  Ql=l 

9305  Q2=(M2-H2t2.-H).-E 

9306  IF  Q2>0  THEN  9309 

9307  Q2=l 

9309  N2=N2+(N2=0) 

9310  WRIT  E"   ( 1 5 1  9  3  0  0 }  1  y  w     u  F:  0. 1  N 1  ' -  1  f  i "  *  Q.  P ! "i  2  "  H  2  *  H ; 

9311  N3:=N3+(N3=^0) 

9312  Q1^='H3-H3t2/N>/E 

9313  IF  Ui:.0  THEN  9316 

9314  01=^1  ^  .  ■ 

9316  H4=H4  +  (:  114  =  0/ 

9317  Q2=<H4--N4  r2/N)/E 
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E  -  EQUIP  CHECK  (cont) 


IF  Q2>u  THEH  93 JO 


05=05+<05=H> 

IF  Ui:y  7.  _ 


9324 


9325  Ql-1 
932o  !Jt>=Ofc+i ;ijb==0  > 
932?  Q2=(M6-0S-0o-  N  -  E 
9323  IF  Q2>0  THEH  9330 
9329  Q2-i 

9338  URIIh   ( IS:  93eaMUd-^iUFQi  JU5^rh  100:^3QpQ2.^^nr^+^^ 

9332  H7=H7+'::H7=0> 

9333  Qi  =  ';M?-H?.rH7.'H>.-E 

9334  IF  Qi>0  THEN  9336 

9335  Qi=l 

9336  NS  =  N8+(NS  =  0 

9337  Q£=<H3-H8*N8/M;>.-E 
933S  IF  U2>0  THEN  9340 

9339  Q2=l 

9340  WKITE  93O0>  lUM^SuRQi.- H7^Nf  Iy0-SQRU2/N-;*H. 

9341  H9=N9+<N9=0) 

9342  Ql  =  ai9-H9^H9/H>/F 

9343  IF  !;!l.>0  THEH  9345 
934^  Ql=l 

9345  H0=N0+<MR=0) 

9346  Q2=(MO-H0*NS.'H>--E 

9347  IF  Q£>0  THEN  9350 

9348  Q2-1 

9349  FuRMhT  F6.2!"°i  ■■!F3=4 

9350  WRITE  a5?  9349>  ioo^SQKQ  j /Hy^-H,  ?.mRQ2 
9352  PRINT 

9390  GOTO  8820 
9400  RETURN  0 
9500  R=522 

9510  F$L  13]=  "KEY  7:  CHRNGE  STHIiURKD  RTTENUflTION  VRLUE" 
9515  FIKED  4 

9520  PRINT  "STDC " 5 10*LGTR3; "dB> " ? 
9530  m3  =  N[  1  ?  3  ]^FNriR3 
9570  GOTO  9515 
9900  GOTO  9998 
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E  -  EQUIP  CHECK  (cont) 


R  3700 

3980 

4  1  30        4  i.  50         !  i:  l:j0 

4  350 

4466 

4530 

4830 

5020 

5030 

5130 

5  6 

5SO0      '^:::rO  -.-n) 

I  -  -:30 

6330 

■7  f  q  1^ 

7910 

8500 

O  -.1  b  0 

9  b  0  0 

Q    ■  3900 

3  9 1 0 

3920     3930  3940 

4  000 

4 1 1 0 

4122 

4140 

4140 

4140 

4 1 4  0 

4  1 6  0 

4 1 70     4'  i.  ''0     V^:,  ;0 

'■  i  230 

-'■  3  3  0 

4  4  6  9 

4  T  7  8 

4476 

4  4  7  8 

4  4  :^  0 

4ri3     43:4:1  4r}\■\^ 

5     4  0 

5210 

5  4  4  0 

5430 

5  5  6  0 

5600 

6  6  0 

5830     5r-:50  53;;:; 

5910 

6490 

6  5  8  0 

6  6  3  f  i 

6670 

6740 

7 3  9 

7390     7  ■.-■'30  ?7^T0 

1  ■'  2: 9  0 

7930 

7970 

3030 

8090 

8110 

if;  1  1  0 

8130     &i7'0  3290 

8580 

3790 

9162 

9170 

9130 

9130     9u:;:50  9260 

92  70 

9  2  9  0 

9  6  0  2 

9  302 

9302 

9310 

m  3960 

3970 

HSL  ]  3965 

3  9  0 

4407 

4720 

4720 

6410 

8040 

3070 

9  5  3  0 

fi$  3970 

4550 

4570-    4590  4610 

4670 

4674 

4690 

4710 

4730 

4750 

4770     4370  4900 

4940 

7110 

7120 

7310 

7  9 0 

8090 

B$ 

ri$ 

L$ 

p$ 


fli 


8  1  0  0 

3970 

3  970 

3970 

3  9  7  0 

3970 

3980 
8830 

2: 9  3  0 
6 1 1 0 
8 1 1 0 

3  9  8  0 
7  7'  8  0 


8120 


4090     4130     4840     58 ;0     5830     7920     8570     3740     5770  9510 


4260 


0     12?0     4  300 


5390  54 10  5420 

6150  69i-4l  fi':iftM 

8140 

5430  5430  5560 

7  9  9  0  8  J,  1 0  8 1 1 0 


'40  7990 


3140 


;1  0 


K0 

100 


43  4:; 


M>'i.-I  HH4|.i 


J  9 1! 
5070 


962 
110 


i80     5964     6120     6150     7048  I'ObO 


E6 

Fl 
F2 


3980 
9060 


3980 

3980 
8540 

3980 

3  0  0 


5  0  7  0  6  2  7 
90  90 


980     5390  6310 
4030     4-4  00 


420;i 


6 J  10  6600 


405  440; 


4032     4420     4420     6h50  6450 


440     4  140  46 


540 

540     6368     6360     6940  7020 


60.:-:4:i     6020     f:4:i30     6230  6370 
0  9  i-J     ■  1 4-  kj  0     6  C'  0  0     6  6  O  2     6  8  6  2     7  2  4  0 


::610  870!: 


F: 


3980     5050  5110 
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E  -  EQUIP  CHECK  (cont) 


F4 

3930 

3600 

3620 

8712 

37 1 2 

Sf60 

F5 

3950 

5930 

C-  Q  "?  CT 

•J  y  1  V.' 

6280 

6540 

3  7  8  6 

3342 

9055 

q     r,  - 

9  2  3  2 

Ft. 

3930 
o  i-  33 

5940 
3945 

60  re 

9055 

C 1 0  0 

i.lK-O 

9  2  ■ . ' 

6130 

6 1 70 

6  9  5 1 3 

7  iJ  '3  'O 

7  740 

7730 

r  1 

3992 

90  72 

pj 

9102 

9212 

r  M  r .  M 

9242 

Is  '-I  f-.  ^- 

Fy 

3930 

H 

o"-'90 

4  0  3  4 

446  0 

4460 

6590 

6390 

3530 

T 

3990 
7730 

4910 
7y30 

4920 

4920 

4  9  2  0 

4920 

4950 

4970 

4990 

5670 

5750 

15 

3990 
7340 

5950 
7  3  5  0 

6  2  i  0 

6210 

7070 

7100 

7100 

7100 

7100 

7100 

7 1 0  0 

16 
J 

3990 
3  9  9  0 

7130 
7930 

7200 
3030 

7340 

O  1  C  M 

7350 

7360 

7370 

Jl 

714  0 

7260 

726  0 

7270 

7  2  £'  Fi 

7290 

n 

3  9  9  0 

5640 

5730 

■  5730 

5760 

5780 

5730 

Ml 

3990 
y  C'  ii!  y 

6590 

O  Q  J.  M 

6690 

'_j  .i  i~4 

6  6  9  0 

Q  Ci  S  ''A 

6  720 

6720 

6720 

7710 

7770 

7770 

7840 

H2 

3990 
7S70 

6590 

7S70 

67fc0 

6  7  6  0 
9200 

o^'^O 
9200 

6790 
-9305 

6790 

7710 

7310 

7310 

7350 

H 

3990 
6590 
7130 
8330 

5060 

6650 

9  2  2 

5150 

6650 

c'2-::0 

9  2  9  0 

5150 

f.  t. : :::  0 

r .. '  1 0 

5240 

6  6  6  0 

3  i  ^  0 

^"'290 

5270 
7300 

5670 
6330 
7420 
9290 

5760 
9290 

5770 

5730 
6350 
3716 
9290 

5730 
6862 

9290 

930 1 
9  3  3  3 

9305 

93 1  0 
9340 

9340 

Q  ■  -;  1  7 
9342 

9346 

9320 
9350 

■-'  — ' 

-■  i- 1 

•-'  ■-■ 

9330 

HI 

3990 
9940 

6590 
9040 

6680 
9150 

6630 
9150 

6710 
9220 

6720 
9220 

6720 
9290 

6     '  0 
9302 

93  i  0 

8930 

3930 

N2 

3990 
9390 

6590 
9305 

6750 
9309 

6750 
9309 

6730 
9309 

6790 
9310 

6790 

6  7  9  0 

8320 

9190 

9190 

N3 

3  9  9  0 

5960 
3910 

6 190 
89  i  0 

6  1 90 
9290 

6990 
931 1 

7  7  3  0 
9311 

7340 
9311 

9312 

9320 

7370 

7370 

H5 

3990 

H6 

3990 

4330 

05 

3990 

3  320 

9130 

9290 

9  3 '?  2 

9330 

ri6 

v  q  q  f.^ 

^_  j_ _, 

'4  1  M 
i  (  U 

q  1 

7  i  1  t' 

Q -J  p 

O  ■"'  'J  M 

P 

4000 
6700 

7730 

C;  "7  O  C| 

9  1  00 

5200 
6760 

9110 

5460 
6770 
7 1  ,-'0 
8350 
9 1 20 

92  i  ti 

7 ' ' 

2:' 

':■  ■  0 

9  2  i-  0 

92o0 

6  3  3  0 

3^60 
9  2  5  0 

6600 

o  ,'3  4 
9000 

669  Oi 
7759 

9010 

6700 
7760 

9070 

P0 

4000 

5.200 

524  0 

5270 

'  5540 
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E  -  EQUIP  CHECK  (cont) 


PI         syyy  5460  55  49  5543     554  0     3V73     3734     87  35     89!j3     3913  3320 

9162  9240  9250 

P2        4000  5503  554  0  553i::i     3590     6  3  23     3330     6343     3733     3734  3737 

9013  9020  90.J0  9132 

P  3  4000 

P5        4000  5700  5720  5730     5743  5740 

P3        4000  7730  7770  7793     7330  7304 

00        4000  62.3 0  6 2; 3 8  6 2 ■  '< 3     3 :■: "33        3 3 

Ql         4000  3726  3363  3933     3930     3940     3973     9013     9043     9053  9033 

9130  9140  9150  9160     9332     9333     3' 334     9313     9312     9313  9314 

9320  9323  9324  9325     9.":Li>0     9333     9334     9335     9343     9342  9343 

9  3  4  4  9  3  5  3 

Q2        4330  3360  3970  9833     9193     9200     9305     9336     9337     9313  9317 

9318  9319  9320  9327     9328     9329     9333     9337     9333     9339  9348 

9346  9347  9343  9358 

Q3        4330  3903  9313  9138  9148 

Q4        4300  6618  6628  6643 

Rl         4008  7300  7310  7328  7328 

R2        4000  7170  7330  7348     7578     7630  7350 

R  5        4000  7 1 7  8  1 B  tJ  7'  3  3  3     7  3  3  3     7  3  5  8     7  3  6  8 

S          4330  5240  5270  5470     55  1.0     5648     5738     6598     6728     6798  6333 

7488  7578  7678  7718  7378 

31  4380  5470  5540  6590 

32  4888  5518  5563  6  5^;?  8 
T0        4  888  6348 

Tl         4000  5900  6628  6643 
T2  4000 

T3        4383  7158  74  30  7470 

T4        4038  7396  7433  7463     7-138  i'470 

' . '          4010  6  3  3  3 

Vl         4310  5640  5740  5740     5733     3593     6733     6733  6733 

v  2        4  318  6  5  'ii'  3  677  8  6  7  7  0     i i-'  9  3     7^10     7  320     7  8  2  0     76: 7  0 

V  7  4  8 1 8  6  3  2: 8 
V8        4010  6833 

V  9        4  3 1 0  6  8  3  3 
X2  4020 

y,  3        4>  Id  2: 0  7  3  4  3  ?' " 3  i  j     I- '  C;'' .  •  i ; !     "513     ,  ■'  5  l  8     7'  '7>  2  0      5  3  8     754'  0     7  5  4  8     7  5  4  8 

7  590  7' 5 9  0  ' 3  i  0     7'  1 3     7  3 5  ■-.  i 
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E  -  EQUIP  CHECK  (cont) 


.K4        4020     7430     7490     7500     r'510     7S10     7520     7530     7540     754  0  7590 
7610 


4020 

5320 

5  350 

h3 

9250 

4405 
9  5  2  0 

5 '  5  0 
'■:>  5  3  0 

I-;:  4  0  '5 
3  ti 

61 1'" 

6  1 1 0 

G  8 0 

3545 

3773 

37Sf 

h8 

4024 

4407 

F 

4040 

E2 

4050 
9  Oi  7  2 

'9 1 0  2 

9  2 1 2 

9  2  4  2 

33:;;;:  6 

o  o  ■  J  Pi 

3332 

3852 

3332 

3962 

3  9  9  i; 

4060 

n 

4  0  7  0 

T 

4030 

FN  J 

4110 
5110 

4160 
87 1 6 

,4  7  f, 

4476 

4473 

4478 

4478 

4473 

4478 

450i; 

FHF 

4122 

5210 

6490 

3772 

FHV 

4140 

4920 

4  9  6  0 

5  7  0  0 

3020 

3060 

3070 

3  070 

3030 

fh:k 

4140 
7740 

4140 
7730 

4350 

4330 

0  {'  \'  0 

5440 

3  730 

3340 

3  2 1 0 

6  6 1^  0 

6740 

729( 

FNW 

J- 1  4  0 

FNR 

4140 

5900 

6  G 1 0 

7150 

FHS 

4190 
5600 

4330 
6  490 

4460 
7  3  9  0 

4476 
?'  9 1'''  0 

44-73 
3 1 7  0 

3290  ■ 

4478 

4  5  0  0 

4350 

5210 

5211 

FHB 

4330. 

4490 

5 1 1  0 

5150 

6020 

3130 

8712 

FHH 

4220 

6  1  0  0 

8712 

4380 
6190 
3716 

4400 
6210 
9530 

4420 
6260 

4.441:;! 
6310 

4  460 
6  3  3  0 

4490 
6360 

5110 
6390 

5150 
6410 

6020 
6  4  21 0 

645 

FND 

4712 
7  9  3  0 

4350 
7930 

5040 

5  G  6  0 

3  7' ""'  G 

5910 
3340 

6530 

6  6  3  0 

6  6  3  0 

7430 

r  1  ci 

FNC 

4350 

5210 

6  4  9  id 

6  G  3  0 

7930 

o  r  r' 

FHP 

5720 
'5  9  3  0 

6  6  0  0 
9  0  7  0 

7  7  0 
9  1  00 

9210 

2  4-  0 

3850 

FS 

m 

cr  1-1 ,-.  ■-, 

5970 
9  2  6  0 

3530 
9260 

3610 
9  2  9 1 J 

9345 

934  5 

m 

9020 

9  0  2  0 

'-5290 

9316 

9316 

9  3 1  6 

9  3 1 7 

9  3  2  0 

N7 
HS 

8320 
8320 

3390 

9  0  0  0 

'i  0  0  LI 

9290 
929t:i 

9  3  6 

9  3 . -1  ;-i 

934  0 
9340 

H9 

9110 

3  1 1  0 

9290 

9341 

3341 

9341 

9  3 '+  2 

9350 

M0        8320     9270  927iJ 
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E  -  EQUIP  CHECK  (cont) 


M3-  ■  :  y 

^£0  Sy2!^ 

89  £0 

"■£1 

M4      -  S 

:..;u  yyju 

9li 

£31 

M.5  i 

3£0  9140 

-.'i'Ti:i 

::£y  9180 

91oU 

N7  S 

2  y     8  9 1 J  6 

89i:i0 

lis  S 

2  0      9  f  1 1  & 

■:'iU  J 

M9  8 

5  20     91  £  y 

-il£M 

E  y 

301     9  3  0  fi 

H'-;  i  ,  -' 
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8.3     A  -  LOADER 


LOADER 
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A  -  LOADER  (cont) 


]  0  C0i1  iJf  [  J  H..l:i:  "ij  "!  :■:  I.  '  '  i  C  "J  ^  m  i.  [  :  J  D I  [  o  .  75  J  ■  Mu  j  iCFC  2 1'hb.  I L  3  ] 
3700  Rtrl  '1  ML'--  7:  -■■!  :  i  -  J  t  or    ' !  SI: 

37u5  liin  M-i  [  r::  ],Li[  71.     i  i..  ;  i  ' 

3 7' ;  7  li  ill  i :  I       j  c  l  7     1  j  7.  1  ■  >  7:  j ,  i  i  h ' '  ■:   J  -  i  ^'i  ]  ^  r  i [  7 r-  1 1.  1  •  £ s [  i.  0  4 :] 

3770  171  M  T  i[  i  4  ■  77!      7l  o  j:i  7I[  1.  ,1 , 
3725  p-NOi 

3   70  7  FLfih   1  -  /  . 

37  .0  I' FLO''.  0  '  - 

3702  lilO.?'  "  PRINT  i-iLL  On     1  ■^•^O'lO  ) "  i 

3703  IMl-'UT  0 

3704  GUT'':  27':'0 

3750  01  OP   ■'[ilOP  STORhOt70::;i:::.:r:U'r  ; 

3760  INPU :  F7 

37C0i  IF  F7=0!  TREFi  ::7':^0 

3770  SFLFli:  1 

3790  REM   "  TflSK  (  Ffa  ' :  1  =5  I TE::  OF  01"  ?  2  ^^O-jFriO  ^  :7^=REN0RK  j  U==7EYB0hR0  L  I  MK "  ■> 
373Z  Fl==F!--::  =  e 

3795  F6=3  '  \ 

3309  H*^-  'R  EH  ORE" 

3805  D I  SP  H$ ;  ■'■   0  I  TE  Iif7TH 1  V=  I  HI  ■<  0  -i77T ) 

3310  IMPUT  QO 

3815  DISP   ^'PRGM  CONS'r  OHiii  FOF  OF' 1  I  Oi  O..  0=^00 ) ? 
3S20   II- i POT  F4 

3  3  25  0  3  -~  Q  3  Fi  0  4T- 1:7  ■  1 0  F  4  '  I  <d  0 

-3840  PRINT  Q3  ■        -  ' 

3915   IF  Fl=:l   THEM  3900  '  ^  - 

3  9  2  0  L I J 1 1 1 1     ^■  E '  1 '  It  <  i  0  5  ■■■r  F  L  Fi  0     j  2 

3  9  4  0  M  E  R  G  F:  +1 '  1 V  5  F  L  f i  f:  I  ^  4  s  'j  0  ■>  S  O 

3  9  6  0  li  $  = "  1-^  B  S 1 H .  0  5     L.  0  i  i  I)  IF  K     '  l!  1  f-  0  :   T'  2  -  F  0 "  ^ 

3970  DEG 

3  9 3  Oi  fi  =  t;:  6  B  3  C  3  =  E  k:  =  E  2  -  E  4-  u.  <:.■  ■■■■  t  y  F  i   I      r     F  5  F  S  =  Fi  =  L.  1   l-l  =  i  -i  7'  =  F'  i  =^  Z  =  0 
3990  GOTO  4030 

3995  R=102 

4900  LEF  FNJCQ:^ 

A  0 1 0  G  0  T  !J  Q  0  F  '-I-  2 1  O  ?  '  2  0 

4015  Fi-1 

4020  GnTO  3725 

4030  R-7L03  ' 
4040  H5^^0 

4050  REN     FiRtlV  G  ' T  j  G  j  f  ■  ' 

4000  03= PES 
4070  Q=INTQ3 

4075  FO-^INTC  o:!3  Q:.*10;.  •. 

■4  8  3  0  F  4  -~  I  !■!  T  ( 1  8  8  *  Q  3  ■•- 1  i  1 1 1 T  ■  1  iJ  F:  3  ' 

4085  F  ?'  =  1  0  0  0  8  3  -  It!  1  i' !  T '  ■  1 8  Oi  Q  3 ■  .  " ' 

4120  LOflt     riFlTM  -H  Ok  F7,  s 

4130  LOhli     DO  i  l  l  hOhO'ET 

4150  LOFlI;     IihTh  SF;.,  In,  i  i 

4160   IF     HUl    F4   THEN  -+100 

4170  iJlSF   ■•RON  It"; 

41;::;0   N:  1^1  .  6  ]-FFiBO  i  FtlFlr,!.  i  4  ■  f..  J  •  ■  ' 

4190  R=^104 

4  1  3  5  3  ---  [-  \  \  Q  3  ■+  F  ■  1 1 F:  1  -i  F  M  3  1  -f  i '  T  l  0  .i  t  f  \ !  7  0 
4200  IF     NOT  F4  THEN  -i-iOO 

4210  R=:^105 

4212  LISP  'OlFlHllGE  ONv  i'F:On  00;  i  :  F  1 -YES  ..^ "  5 

4220     M::::FF|B4  +  FNi!0 

4230  IF   0  =  11   INLN  4  26!:' 
424  0  U-FMF13 
4250  0010  4190 
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A  -  LOADER  (cont) 


42h2 
42  c- J 
4270 
4236 
43^0 
4310 
4315 
432S 
4325 
433e 
4340 
4350 
4  365 
4370 
4380 
4390 
4400 
4410 
4420 
4460 
4470 
4475 
4510 
4515 
4520 
4530 
4540 
4550 
4560 
4570 
4580 
4590 
4610 
4620 
4630 
4650 
4660 
4670 
4630 
4632 
4700 
4710 

472..- 

4730 
4740 

4750 

4763 
4770 


I  3  0 
4810 
4320 
4330 
4840 
4S59 


R-1H6 

GOTO  ft  .f  - 

DI8P  "LINK:  i=8ITf;  rRff  ••hiiORK"^ 
INPUT  F6 
UUTO  4260 
R-107 

LINK  #a0-5*F7)  . 

R=108 

Q=5 

Hl=2 

85=©.? 

e7^i6^L:: 

C2=N0=2=l 
E2=6 

E3=3S-'36y0 

E5=6'3500 

E7=40=349 

N4==:30 

R5=ll 

LINK  #(io-5*F7;'.  i:  p-'ee 

R=189 
Q-5 

LINK  #a0-5*F7>  5  <12+F7*<Fb+l  >;  550s5O 
R=l  10 
5EF  Fh: 

H$=''rlECLir  _>- I  jKLhriv'PQr; 31 

B$="12345d?8'?8  " 

GOTO  Q  OF  529055530^5" 13 

GOSUB  4580 

RETURH  0 

DISP  "N  DflTfl  VIA  5=EKT  CfiSS?i0^1NT  CRSS' 
INPUT  Q 

ilHT  H-ZERl  26^1  J 

LORD     DRTH  #Qj 10, H 

RETURN 

R1=H[  1 J  1  ] 

H2=Hr  1,2] 

h3=H[ 1 j3 J 

B=H[2? 11 ] 

B0=N[2<  10] 

82=H[ 2- 2 : 


B9=H[ 2- ? : 
C=Hr3.  113 

:-■=•_  3j  10  j 

C1=H[ 3j 1 1 
C2=Hr3.2  J 
C3=N[3,3 J 

C4:rHr3,4  J 


C7=rlL  3  -  7  ] 
C8=K[3.3] 
Cy=HC3»9] 
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A  -  LOADER  (cont 


4i  r.e 

li  --'W--,  4- 

ill] 

4570 

r9-:N[  ' 

+  J  .1,  '•' . 

] 

A  y  y  1  j 

1'  1  ^-'^  i[  ' 

hi] 

43':m::I 

!  ■  "'  —  1  ■!  i  ' 

1 )  ^'  J 

Ii.;  =  iir  - 

1  ?  I 

491  y 

ji  4-=rj:; 

t  -  4  J 

4?  .:u 

1Vv^  :k  - 

1  J 

4  9  U 

li  o  --  M  ;„  ■ 

\  f  2  1 

4  9  40 

L ':'    ill  • 

T  J  '7  ] 

4  9  9  u 

t.  '  1 -1 L  '  j 

1  1  ] 

49r"0 

F^^M[ 

-  1  1  ] 

4  9"'  0 

'  ],  y 

J 

49';;n 

f-  1  =:  0 

5  u  !J  i-'i 

G  -^i  h:  7 

1  1  ] 

5  0 1 U 

G4^4;l 

7  1  4  ] 

G  j  =  N[ 

/  1  J 

5  0  3  fj 

Gb=-f-i[ 

7 ,  6  ] 

564  0 

H  =  Hl  3 

1  1  J 

5050 

H1=i1l 

3:  J  1  ] 

5oSo 

rl  j  =  N[ 

3  1  5  ] 

507'0 

H9-NC 

:-, ,  -\ 

5080 

L--ML  1 

2i  1  1 

j 

5090 

LI -  r;[ 

1  V ,  1 

5100 

L5~!iL 

1  d  f  'j 

] 

5110 

L6-HL 

1  2 !'  3 

-i 

5120 

L7 -fiL 

1  C.  ?  i' 

J 

5130 

LS=4|[ 

5140 

L  '-1  1  i  L 

12i  9 

i 

515  0 

M  =  H[  1 

3M  1 

] 

5160 

h;=4-l[  1 

4  <  1  1 

5170 

HI -HE 

1  4-  i 

J 

5130 

N2  =  Nl 

1  4  H  2 

] 

5 1 9  0 

H5-0 

5200 

Nb-N[ 

14^3 

1 

5210 

H7  =  H[ 

1  4  1  7 

j 

5215 

U3-4i[ 

1  5  J 

] 

5220 

T=Hr.? 

:0j  1 1 

J 

HE  2 

;3,  1 1  ] 

5240 

TRFlH? 

;fef: 

T 

5250 

RETUF 

:H 

5290 

Q=-FHI 

5300  PRIi  ir  TF!L;31  ?  "  PFnjG  GUHGTi  ' 

5  3 1 0  h   -  '  H  B  L-  h  b  r  Ij  F!  i  J 1  \  L  i  i !  i  u  i  L- :  K  '»>  i  U  V  U  ',■ '  i'  2  ' ' 

5320  Q1=0 

5330  02 ---10 

5340  FOR   1=1   TO  26 

5350  FOR   J-^=l  TO  11 

5330   IF  H[  I ,  J  ]-0  THEN  ■■::.4/'0 

5370  Q  1=01  1-1 

5  3  3  0  V  2  -■-  L!  d  r  2  ■ ::! 

5390   IF  02  :: 5 5  THEH  54  lO 

5  4  0  f  i  I J  2  =  1  Gi 

5410   IF  Olf:!    rhEH  S4  4i:i 
5420  RPJMT 
5430  PRIHT 

5440  F'RIiir  THU:::2^  Hl:[  M.       Gi;  ■hiiilij]; 

5450   IF   IHT';  01 --O    -01    ;;    nit  i.;  :4'G0 
5460  PRINT 

5470  nf:;t  j 

5430  U2--10  - 

5490  01-  0 

5500  HF7:T  I 

5510  0  r  M ; 2  +  F  N  [5 

5520  PL  1 HPM  0 
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A  -  LOADER  (cont) 


5530  R=- 1 1 

5540  niSF  -WHICH  P-OG  T 

5550  I'i--JT   -:*E  1  j  2  3 

5560  :••         1-1  j='"8"  THEii  ■■ 

5570  -■■  '  -i':- :  T , 

5580  :^  >  " 
5590  V  , 

5600  .j=P0S';E:^ '  E  i. ■: :  ■  2  : 

5610  ]jI3P   "r'E  .    .-„u£-  :    .  _ 

5620  IHPUT  HL I? J] 
5630  GOSUB  4650 
5640  GOTO  5540 
5650  R=112 

5655  LISP  "STORE  H:   0=H0»5=E:u   CnSS^ia^INT  CflSS"? 

566y   INPUT  Q 

52":    :^  2  THEH  56S0 

56. E -J  5700 

5690  STORE     DfiTfl  tQ-lu^N 

5700  RETURN  O 

5710  GOSUB  4650 

5720  RETURN  O 

S000  N=113 

8010  M=S 

S020  N=K+1 

8030  h=n+l 

8040  LCfiD     DHTh  H 

8050  STORE     PfllH  s5?H 

8060  PRINT   'DISK  'ILL  iihifi- 

8025  ^^IHT  Th&15^  ■■2nt;-;::22        2  ■  .  /    ^  ■  ^  '  PUM.-sr-^" '     1  j/lSOr"  EL="BE4,2j 

82  \    -  -  :HT  TRBSjSJjPx,  ■FR£2  ":nL2  ]  10U2 
b222  FR. IMT 
8085  PRINT 
8090  bOTU  8020 
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A  -  LOADER  (cont) 


5530  5b5Q 

fl  1  39SS  ; 

Fll  I  433U     4.1:53  ■  . 

h  2  1  4  6  6  0 

iH3  1  4679  ~" 

B  1  468e  \ 

EO  1  4bS2 

B 1  !  ^ 

B2  i  4700  ■   -       ■     .  -■ 

B3  1  4710 

84  1  .  . 

B5  i  4340 

Bb  1  3930  ' 

B9  1  4740 

C  1  4750 

00  ]  4760 

02  1  4360  4:3:,i'i 

C4         1  4300 

C5         i  4810 

07         1  43  2:0 

C3         1  4  340 

C9         1  4350 

II  2  4360 

DM        2  4370 

lU         2  43.  :0 
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A  -  LOADER  (cont) 


489S 

t; 

- 

4900 

I  - 

_ 

4918 

2 

4928 

LS 

4939 

D9 

494  y 

E 

4956 

Eli 

^  1 

— 

3988 

E2 

3980 

4370 

E3 

4380 

E4 

2 

3930 

F5 

2 

4390 

E6 

2 

3980 

E7 
E3 

2 
2 

4400 

E9 

3980 

F 

4968 

F0 

3 

4970 

Fl 

3792 

F2 

2 

3980 

F:5 

2 

3980 

F4 

2 

3829 

F5 

3930 

Fc. 

3795 

3325 

F~ 

- 

3769 

37: 

F3 

3930 

F? 

- 

G 

- 

4350 

G4 

- 

7010 

G5 

5020 

_;  "_ 

=  030 

H 

HI 

5050 

?b0 


280     4450  451 
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A  -  LOADER  (cont) 


HS- 
H9 
I 

15 

J  • 

Jl 

K 

Kl 

K2 

K3 

K4 

K5 

K6 

k7 

K8 

K9 

L0 

LI 

L4 

L5 

L6 

l7 

L9 
M 

M 1 
h2 
N3 

HO 
Ml 
H2 
H3 
N4 


5069 

4  3  J  0  ?  'j '  J 

5340  jJt.H  '.-140     b5iJii  5570 

5350  u'itu  5440     5440     54-40     5  4- 70  5600 


3yo0  5i-'i:i0 

5100 
5  ],  1 0 
5120 
5130 
5 140 

5150  &010 


i40 


3yyy 

10 

5170 
5130 


4-:ii-:,.iJ 


4410 
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A  -  LOADER  (cont) 


N5 
H6 
H7 
US 
H9 
P 

PI 
Q 

Q0 
Ql 
Q2 
Q3 

Q4 
Q5 
9.6 
9.7 
Rl 
R2 
R5 


4230 
5fc?0 


4S3i 


4040  5iyjj 
5200 

3930  521U 


3930 

-y  •-. 
-_•  I  ■_• 

4240 
5698 

3310 

5320 

5330 

3792 
ii  1  J 


4420 


4000 
4325 


3825 

5  -J  o  *J 
3325 


40  '>3        ifi  '0 


4075  4120  4139  4156  4195  4220 
4  559    4590     4520     5290     5519  5666 


5370  5410  5450  5450  5498 
5330  5390  5400  5446  5489 
3325     3840     4065     4070  4875 


4080     4080  4085 


T 

Tl 

T2 

T6 

T9 

U 

111 


522M 


VI 
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A  -  LOADER  (cont) 


Zl 


FNR  7 

FHB  7  4130  4?.:::i;:i 

FHC  7  4195 

FND  7 

FHE  7 

FHF  7 

FMC  7 

FHI  7  52-5y  S51U 

FN  J  7  4000 

Fill-:  7 

FNL  7 

FMi1  7 

FHFI  7  4180 

FHF  7 

[■MO       7  4195  -il-- 
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A  -  LOADER  (cont) 


FUR  8 

FH3  3  4195     4;!  ;'':i     K S ]  i; i 

FHT  d 

FNU  3 

FHW  S 

FHK  8 

FHV  3 

FHZ  3 

FilC  ]  9  16        y0b5  B&7ii 

BE  ]  9  3710 

C[  ]  9  3710 

DK  ]  9  10  3065 

F[  ]  9  3710 

G[  ]  9  3710 

NS[  1  9  3710 

HS[  ]  9  3710  4i.5i:' 

4300  4310  4 f 

4910  4920  -i  ■ 

5040  5050  5  Or..; 

5 1  5  0  5160  5  i I- 

5610  5620  5o90 

SSL  ]  9  3710  4120 

TI[  J  9  3720     4130  5243 

XC  ]  9 

D$  13  3066 

H:f  10  3960 

P*        10        5240  yi:j!"ii 

3$         ]0        5553     5500     '■■^.5,.;^     .^bya  .::i.i70 

X$  10 

E$  10 

H  $  370  5     3  8  0  0       .  ■ :  ij ' .     -i  'j  1 J     5   i  0     5  \  4  3 

L*  3705 

37ti5     4543     ' :  I  !■- :     '   >    ■.         iji : 

M  ]  3720 

ZIL  J  3720 

L  5030 


30     4b  16 

4620 

T  6  5 

4670 

4  6  S  0 

4  "  ■'  ;  1.^1 

4730 

4  790 

^i350 

4360 

4  "-!  00 

4970 

5  0  0  0 

1  6 

502  0 

^0i'0  50 

3  :;J        5  (J  9  0 

5100 

5  1  i  0 

20 

5140 

71  so  52 

00  5210 

5215 

36 

5440 
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8.4     B  -  SITE  PREP 


SITE  PREP 


@)  RUN,  DATE,  SITE 

@)  F,  BW,  ELEV,  ANT 

(22§)  ANT  PT  ERROR 

(|T9)  G/T,  T,  Ta 

(221)  TEMP,  DEW  PT 

(fU)  SUN/MOON 


PRINT  SITE,  FLUX 
DATA 
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B  -  SITE  PREP  (cont) 


3700 

Hi="HBSlB.  0i 

3  7  0  5 

liEG 

3708 
3710 

CFLFiC;  9 
hi  3  ]-803 

3715 

Rl  4  ]=^462 

p- :--  ri 

37^:^ 

3  730 

Q=^FHJ1+FHJ2 

+  FNJ3  rFNJ4'N' 

■Z'  1  O  "l" 

r,MTn  3975 

3740 

3  7  4  J 

DEF  FNE':N0> 

3750 

REN  <ME;S  99 

1 3  )■ 

3 5  o 

E  0  =  0 

3  7  6  0 

El=50*( 1 /Kl 

3765 

IF  Ba4  THEN  37S0 

3  7  7  0 
3  r  I  5 

iL.  —  ""-I 

GOTu  3795 

3'  7  3  0 

Q0=4. 73*(5. 

9-B0  ■■!  5 .  39  '  - ' 

■-'  '■' ^' 

Ql  =  ':  7.  12-E0 

HE:--  12-- 

3  7  9  0 

Q2=0 . 1 5+0 . 3 

5-+*(  fi  hi -+-1:11  > 

3795 

P1=2*SG!R'::Q2 

t2-+-13*ii2T2) 

3300 

E2=(a-K2::'* 

Rl-i-Dl' 

3  y  0  5 

E3  =  (H/F/2E  +  03)12--5O 

3310 

E4=0„ 4*E0*B 

o-Kl,  |...^■■o[r^ 

3315 

lit! -80* Ii5*  3  . 

7S4/B 

3320 

E5=<  1--(SIH  < 

Q2*130'^PI  V- 

■ "'  d.  5 

Ee^0, 023*T[ H0' 1  1  ] 

3830 

V=1+FH2H0*G 

■  T 

3335 

Y5=Y/<V-1 > 

3840 

E7=SQR( (09* 

V5)T...:-'-H2t2:' 

3345 

E8=i  00*113*  ( 

1/KS-i ) 

3350 

E9=  100*1)9*  ( 

l/K9-i  > 

3  o  J  5 

RETURN  0 

3860 

3  3  6  5 

DEF  FNMMj;. 

LISP  =Hr 

:;'NON; 

■J  31  ,-■  5 

INPUT  L* 

3  8  o  0 

IF  f 

HEN  3390 

3885 

H$  =  L* 

3  3  9  0 

RETURN  0 

3  31 9 

LEF  FHF':  Q;' 

3  8  '~J  J 

GOTO  U  OF  4170 

G  0  J  0  4  8  7  0 

3900 

R^204 

DEF  FHJ'Q;. 

3905 

GOTO  Q  01-  - 

I- 1  ^?0  ?  'j  1  9l:J  '  Zl 

3910 

G  0  T  0  Q  -  '3  0  F 

■   5740-  0335:. 

3915 

GOTO  3975 

3  9  2  0 

R-205 

3925 

DEF  FNT'.:Q  ' 

3  9  3  0 

FOR  ;■:!-]  Ti: 

J  i--;2 

U^RL  /A  ] 

3940 

V:4ir  J«  0  ] 

3945 

URITL     15:^  bG70)V  ■■HJiJ? 

3  9  5  0 

N[  J'  0  ]-r1[  J; 

. 6  ]  +  V* 1 00 

f'1L  J'  7  ]  =  J 

!  7  ]+';;  Vs  ,1.00/ 1 

3  9  N  0 

in-;;T  ■■:i 

3'  9  c ' 5 

REIN  1 

2-F  1; 


- 1  ■  !■■   J  3.  t  r-  \  -I ..  i  7  +  F  H  J  3 1-  F  N  ...1 3  +  F  [  \  J 1 3  +  f  \-.  J 1 1  -^  F  i- 1 .112 


2-i-0 .  4' 
( 0!  0  / 1 


4 15' 5t 


4915?  445 


I J  ?  5980!  G  3  -\  0 


3970  RETUF  N  0 
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B  -  SITE  PREP  (cont) 


3375  F:  =  2j6 
398i3  PRINT 

3935  niSP   ■Ti:::R;:/rRTs  l-  L.i<  MP rV::  :^  :;■::  =  i.  i<  RNRK  ?  3KP  VS  LIST"? 

3398  Q  =  FHB3  +  PHrli;i 

3  9  9  5  G  0  T  0  Q  0  F  4  id  5  5  ?  4  :l,  4  5  ?  4  00  5 

4000  GOTO  3735 

4005  R=^:307 

4010  Q=FMS2 

4015  PRINT  TFii3  30^  "KEYS" 
4020  PRINT 

402  5  P  F;  I  ^1 T   "  0 = N  i-i  I  \-\  0  f  ■  T  1 :  i \\ 2     1  =  R  i"  i  #  n  T  fi  T  E.  ?  i...  0  C        2  =  F  >  B  Im  ?  |-i  1^^  T  3  Fl \\ T  P'  T  E  R  P. " 

4030  PRINT   "  4^=^G -T?  Th  T,, ,  Piip     =;;  =  T::np„    nrt,'  pj  F^SUN  -  MOOr-i  ?  =  PRT  FTFlP  &:  U 

4035  PRINT       y  =  CHLC  FLUX  9=4'-'Rr   i  'P  VfiLUES     lO^STORE  S^TjN  ll^^FRT  ALT  STFiR: 

4040  PRINT   '■12==EL.EV        GITT     13-  i-iEN  HdjJ)" 

4045  Q-FNS2 

4050  GOTO  3975 

4055  R=208 

4065  Q-5+FNF1  ' 

4070  Hi ^^2 

4075  E5^0.2 

4085  C2  =  N0  =  Z=^1 

4090  E2-F 

4095  E3=30 ■■•■3600 

4100  E5-6/3600 

4105  E7=40.349 

4110  N4=30 

4115  R=209 

4120  R5-11 

4125   IF  F7  THEN  4140 

4130  DISP   'TiPiTFI  TFIRE    lN  PLi-iCP  '  ; 

4135  Q=FNe5HFNNl 

4 1 4  0  LIN     # 1  0  -  5  *  F'  7 )  „   2  i- ' "!  F" 3  7  O :  ;:■  ^  ?;  7  7  7i 
4145  P-21U 
4150  GOSUB  4170 

4155  DISP   ■■iJHTfl  RENORK   ;nPE:/riISK  IN  PLhCE"? 
4160  Q=^FrlB5  +  FNLIl 

4165  LI  PI  \    it  ■:;  1 0  5  *  F  7 )    I  2  +  A  +  P  7'  ?  Z  O  ■>  7  0 

4170  R^=211 

4175   IF    ::.TfiT10   >=  4  TilEI-l  '-ll&i 
4130  RLMIPiD 
4185  RETURN  O 
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B  - 


SITE  PRE?  (cont) 


4iSa  R=diL 

4195  E=TC 14,93+28125 

4280  SISP  "CHflriGE  RUri        ,  ^-  ■ 

4205  Q=FN&2+FHHy 

4210  IF     \m  Q  THEN  44^5 

4215  DISK  "RUH  HUMBER' ; 

4220  Mfc=FN£.3+FflHHb 

4225  DISP  "YEhR"; 

4230  pJ=-5: 9? 12] 

4235  :: 

4240  12  3=HS 

4245  Ei=VHL4H*> 

4259  BI3P  MOHTH"; 
4255  H$=P3r4<b3 

4260  Q=FHn5 

4275  E2-  - : :     i  - i :  ^ 

4280  IF  E2  =  2  3  "-Er,  --.^ 

4285  F$L4!i6  3=H*[3*E2-2?3-E3+2  J 

4290  DISP  "BHt  OF  HOHTH'^ 

4295  Hi=P$[75S3 

4300  Q=FHQ5 

4305  Psr7?S]=ri$ 

4318  E3=VHLCii*> 

4315  Q=(El-1900>-^4 

4320  Qi=lHTQ 

4325  M2=4*<Q-Ql 

4330  J=IHT^<e2-3.- 4  ■ 

4335  IF  E2>2  THEN  4358 

4340  Jl=a 

4345  GOTO  4355 

4350  Ji=l 

4355  E=31^(E2-l>^E3  +  Jl^^<-iHT=:':S.4*r2>  --E-Sj  +  l-JS+J*?  02*365?^  4rcQl*3o5.  ZS; 
43Em       1  i •  ?  :  =  E-E  1 1 2  j 

4370  C£:=^  .    :  ■yc7^Ql+3i:;j.  ^r":",;  -  :rJi  ^"E5)^^53.2iC2 

4375  C6-:  : 

4380  Cg=3ci.r  .C6-IHTCS> 
4385  DISP   'DRY  OF  REEK =5 
43=1!'  H*=P*C  1j3] 

G^=FN09 
44Dy  P$[ 1 ?3]=Hf 
4405  LISP  "PROJ  #  ; 
4419  H*=P5L 13^20  J 
4415  U^Fm? 
442y  P*[ 13-20 J=H* 
4425  IJISP  "LOCHTIUH-t 
4430  H$=Pj[21..4yj 
4435  U=FHu9 
4440  FJC 21^48  l-HJ 
4442  Q=-FNF0 
^445  ^E'.'U  0 


i 
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B  -  SITE  PREP  (cont) 


4  459 

R  =  £13 

4455 

i>199u+  ■  T[  14^911.  ;-;K'5 

4457 

DISP  "FRT  SITE/':,  rhf'  Ij- 

1 1  ,  r       ;ij  ^ 

4458 

Q^^FNHl 

4459 

IF  Q=9  THEN  4795 

4469 

Q^FHC  3+-FHI5  tF:MSl 

4465 

FORMliT  5::<  "SITE-    iJ.  i... 

ir|'."  r-  3' ■■ 

M  :  [ 

J" .  lO: 

■ ,  "    I  T  T  T ,  j  r  ;  c" 

4479 

NRITE   ^  15<  4465"' ■■i.Mri  Ti 

J    ■-!!•'.:  IE. 

Oi  i. 

IT^' 

4475 

FORMFiT  3F13.  ::?2F  iu.  3 

4489 

WRITE  (  15  -  4475:' r  4^  "  J. 

;  ^         C5  5  " 

,  CO.  "  I- 

:  .-'i  "  <  06  i  "    dc  ?  " 

4485 

Q=FH32+FNI5 

4498 

PRINT  THB34'  "FLU;-;  DnTi 

i 

4495 

FURMHT  F2. 9' F3. "  '  

' .  F  5 .  1  .  ■ 

1? 

'  . F4. 9 

.  "   CHz "  ?  F4  .  0  ' 

13" . F3=  9 

4599 

FuRMRT  F3.  2-  Fy.  ;, ,  "  h  

'  1  itj  =  3 

4595 

FuRNf-iT  Flu.  1  =  F7.  2j  '  r 

■  ■' '  r  5 .  2  5 

■■  n  •  i 

r " 1 F35 

.3."  +-".F6.3. 

■./  Y r " 

4510 

PRINT 

4515 

PRINT   "  SThR"Thih:i:"' 

K  li . 

"TRE40 

■F.flHGE';'ilHr>  31 

ZE  !■!  1  n  >  " ; 

4529 

PRINT   ■■     3PEC  lUDEX" 

4525 

FORMhT   "         Epoch" H&K 

.-■'seciU'X^ 

■  L  e-  c 

J  y  '  :*  ■  l1 

\ .  "  3  ecu  1 0,  r  E;::f 

ii  ns  1  on " 

4530 

WRITE  '::i5'4525:' 

4535 

PRINT 

4540 

FOR   1=^1   TO  Nl 

4545 

TRFiNSFER  T[  I  j  1  ]  iO  3$ 

4550 

WRITE  '- 15'.  44^5,' T  ' 

•|,  rr 

^  .  3  ]  1 

T[ 1 . 13  J  lOO. 

T[  I  ■  19  ].  TL 

4555 

WRITE   0  5.  4509  VIC  I  <  H  J 

r(  I  > 

r.  ]/10O 

3.  T[  I . 7  ]   : 003 

4560 

IF  FiBSTC  I "  4  ]  +  HE3  i  L  I  ■  5 

]  +  Hb3  Ti.  1 

1  3 

hB3T[ I 

.  16  ]^^RE:3T[  LIT 

THEN  4 

4565 

Q=Tl I ?  5  ]  ■ 1 009 

4570 

WRITE     15?  4595  '  TL  1 ,  15 

]■■  10.  Ti,  J 

13  1 

100. T[ 

1.17  ].■■  100.  T[  I  . 

4 ] /lOOO. Q 

4575 

PRINT 

4580 

IF   I. •-3- 1  NT':  I.  3:' #9  ThlE 

hi  4  500 

4535 

PRINT 

4590 

NEXT  I 

4595 
4600 

Q=::FH31  +  FNI1 

PRINT  TRE3n.  'FPijG  CON 

31  :'' 

4695 

FORMRT   ■■   H     T'.:H<  1  ' 

3'  N.  1 

':  N .  1 3 ::.  " 

4619 

WRITE  '::  15.  4605>  "  [nh  i 

3-  30  1  T 

1 -1  ^  -1  > 

T  N . 

6  )       T '::  N .  7  " 

4615 

FORNRT  4;-;.  "Ta-J.  15  '"  T 

31.17 

.  '■  T ';  w .  4 ;'     T  ( t 

1 .  5 ) " 

4629 

WRITE   ':  15.4615;' 
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B  -  SITE  PREP  (cont) 


4625 
4639 
4635 
464U 
4645 
4650 
4655 
4660 
4665 
4679 
4675 
46S9 
4635 
4699 
4695 
4799 
4795 
4719 
4715 
4729 
4725 
4739 
4735 
4749 
4745 
4759 
4755 
4769 
4765 
4779 
4775 
4789 
4735 
4799 
4795 
4399 
4395 
4319 
4315 
4329 
4325 
4339 
4335 
4349 
4345 
4359 
4355 
4360 
4365 
4379 
4375 
4339 
4335 
4399 
4395 
4999 
4995 


E: 
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I L  1- 


H . LEC  5  9 ' 


'LIHEflR  FOLZ" - 12K 
'GHR  Hr-"  J  5X?  "H,  DEC-  Hr 


R^214 

Q=FHS2+FHI3 
PRINT  TR&39! "LOCririUi 
PRINT 

FORHhT  "     SThR  Er'OCli 
NRITE   ('15- 4645  ;.■ '  SOL  Ml 
FORMRT  Fli.3iF13.9-;"::  . 
i:!=^1999+^^2S125  +  T[  1-^-  ■ 
Ql  =  1990+' 2S125  +  TC 14- 16  ]) 
WRITE   a5.4655)Q,T[  l4,9  J 
Q=FHS2 

FuRMhT  4X< "STAR: " - eX? "RT. RSC" ^ 
URITE  (i5j468e>-i-'Ut.2  nWh  ■ 
F9RMHT  4X<"3ULRR^     GHH  ■?  9  GMT 
WRITE  ( 15? 4699; "HOR  PRLX  PHRSL" 
Q=FH31 

FOR  1=1  TO  HI 

TRRNSFER  T[ I ? 1  ]  TO  S$[ 1^5] 
FORMRT  F2.9jr9.2?"  de9"Hi-S.2'"  de^" 
WRITE  (15^4715)15"     " . S* 5 S[ I ? 2  ] - S[ 1 , 3 ] . 
IF  T[  l!i2i  ]=0  THEN  4^56 

FORMRT  F10.3j  "  de9"  ■>  F8.  3^  "  deg" »  F8.  3j  "  ds-g"  j  F4.  6^  "  day " 
WRITE  ( 15?  4739)T[  I   1 1  ].-  l999i  TC  I  •  12  J/ 1909?  T[  I  ?  13  ]  ■  i860?  T[  i  ?  14  ] 
GOTO  4755 

FORMRT  F3.1?"       +-"?F7.1?"   •r'-FlO.i?"       +-"?F5.1?"  LEG" 

WRITE   (15.4745)Tl I? 11 J/10?Tl 1? l2]/19?T[ I? 13 1^19? T[ l>  14]/ 19 

IF  I/3-INT(  I.-3>#0  THEN  4765 

PRINT 

NEXT  I 

Q=FNS1+FNI1 

PRINT  TRE31  ?  'PROG  COHSTS^' 

FORMRT  "_H     T(N?1)  S':Nj2;'  S(N?  3) "  ?  6X?  "T(N?  11  :^ 

WRIiE   ( 15?  4730)  ■  I  ^  H?  io  l'.:N?i4i 
Q=FNS2+FNI3+FNS4 
RETURN  9 
R=215 
RESTORE 

READ  T[  14?9]?S[  1?2]-S[2?2  J?S[3?2]?SC4?2]?SC  1?3]?S[2?3: 


r  ( N  ?  1 : 


,  3  ] ,  3  [  4 ,  3  ] 


DRTH  -739?  359. 573 ?  299 . 654 ?  33 , 2' 

E6= ( E-2S 1 25-TC 1 4  ?  9 ] ) . -365 .  25 

FOR  1=1  TO  Ml 

IF  T[ 1,21  ]  THEN  4355 

Q=(0.  012397229+5.  56679 1 7E-0 ;---S 

Ql=5. 5667927E-93*C0SS[ I , 2]*E6 

SCIj2]=S[  I?2]  +  Q 

S[  I.3]  =  S[  I?3]+Q1 

NEXT  I 

T[  14i'9]=E-23125 
IjOTO  4459 
R:-216 

niSP  "SITEiW.  LONG"; 
C4=FNNC4 

DISP  "3ITE:N.LRV5 
C5=FNHC5 

DI3P  •■SITE:RLT(KM.'"; 

C9=FNNC0 

RETURN  9 


51- 


58. 6812?  40. 6516?  21 


4039 


I?2]*TRNS[  I. 
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B  -  SITE  PREP  (cont) 


IF     HOT  0  THEN  5171:1 
Ti:  14,  10  ]  =  T[  12<  10  ] 
SEF;ROR  Ih  4945 


4945  HU=^^5  +  FHS2 

4950  PRINT  "FOi.„l..UWlHr,  IHROTS  ORE  iN',":  EfiRTS :  1  ;vl  =c:!p-^< j 
4955  PRIilT   "IF  DEC   IE  SouU-i:   enter  de=^  end  run  HEGhT 


4975 

Q=FNNS[  NO  ;i ; 

m'  "1 

4980 

DISP  "MIH"i 

4  9  S  5 

Q0=FNH0 

4  9  9  0 

S[  NO  J  2  ::i  =  Q  +  i' 

3  0 .-  ■  6  0 

4995 

DISP  S$;  '■ :  1 

■iHH    0  1,: 

:  i^HT">; 

5  0  0  0 

Q^FHH':  S[  HO 

:i   2.    ]  +  0  ::   ti  1 

2  -Fit  i'lO  1 1 

5  0  0  5 

DISP  "MJN^' 

l>  0  1  0 

Q0==FNN0 

50 1 5 

Q 1  =  0-1-00/60 

502  d 

IF  Q1>S[N0 

;i2]  THEr 

1  5030 

5025 

1 J  1  --  Q  1  -I-  3  0 

5030 

TC  HO) 1 1  ]  -  1 1 

dOiii  s  K  I.!  1  - 

■si:  ho?  2  ])/ 

5035 

DISP  "N.LEi 

Z  0  0  Qv 

]]■•■ ; 

5  0  4  0 

Q"FNNS[ NO; : 

3  ] 

5045 

GOTO  5050 

5050 

DISP  "NIN" 

Cr  i-j  CL-  LT 

•J  U 

Q0=FNN0 

5060 

IF  SGilQ 

0  THlM 

5U 1  0 

5065 

0  f  1  -  H  E::  '6  U  k) 

5070 

SI  HO?  3  ]--Q  + 

Q  0  6  0 

5075 

DISP  "N-DE 

C:  0  1 2.  ( 

:iHT" ; 

5030 

0=^FNN(SC  HO 

J  3  "1  +  0  ,  0 : 

!  2^T[:  NO;  12 

5035 

GOTO  5090 

5090 

DISP  "MIN' 

5095 

Q0-FNN0 

5100 

IF  SGNQ 
00=-flBSQO 

0  THEN 

5 1 1  Ci 

5105 
5  ]  i.  0 

T[ NO? 12  J=l 

000*  (■  IJ  !■( 

;)0--'6h-  Sf  Nk: 

5115 

IF  HO- 5  TF! 

EH  5100 

5120 

DISP  "HOP 

F'hphei.  h;^ 

5125 

Q=FNN':  Tr  tJO 

,  13  ]/10. 

T  0 ! ' 

5130 

IF  Q<2  THEH  5150 

5135 

DISP  "ERRii 

R:HuR  Pi 

■iRHi  l,h2  >,: 

5140 

0  =  FNES  I'F  MS 

1 

5145 

GOTO  5120 

5150 

DISP  "MIN" 

5155 

00 -:4  NiiO 

5160 

TT  HOn  13  J-i 

0  0  0   <:  Q  T- 1 

-!0  '60 

5165 

DlsP  'HOE 

(DOTS ■' 

5170 

i [ H0< 14  ]M- 

HH 1 [ Hn, 

1  •!  ] 

4  9  6  0 
4965 
4970 


Q:.pK|Si+FNBS 

TRANSFER  T[  fiO?  1  1  TO  S* 
DISP  S$? " : GHh  0  0  GNT" I 


REfORH  0 
NO^E 

GOTO  49i55 
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B  -  SITE  PREP  (cont) 


5190  R=213 

5195  D I S  P  "  M  E  N  F  .  ■  ■  ■  B  N  /  E  L  £  V  /  H  W  f  C  0  \  I T  (  1  -  ■  \  L  £  "  ? 
5280  Q=FNN0 

5205  IF     HOT  Q  THEN  54  18 
5210  F1=0 

5215  LISP  "CENTER  FREQ-n:]HZ "  ii 
5220  F=FHHF 

5230  110  =  0 .  9/F  T-2 

5235  raSP  "ERR   IH  FREC-:  ■■;)"; 

5240  F0=FHHF0 

5245  niSP  "BHNnWIDTHCMHZ) " ; 
5250  N=FNHN 

5255  niSP  "ELEV(riEG)  "  ? 
5260  L  =  FHiJL 

5265  niSP  "RHT  IHhM  vFTV; 
j270  r!  =  FHNIi 

5275  liISP   "1=HPR  EFF,2^Hi-IT  l-IPBN !  3  =  CMVL  HPEW; 
5230  Q=FNH0 

5235  GOTO  Q  OF  5290 ? 53 1 u ? 5350 
5237  GOTO  5330 

5290  DISP   "hPERTURE  EFFICIENCY" 5 
5295  B2=FNHE2 

5300  B  e = 3  0  3  5  /■  II .  ■  ■  F  *  3:  Q  R  ..  B  3  .•  -  B  2 ) 

5305  IjOTO  53^:15 

5310  niSP  "FlHT  HPENdiEG)  ■■ ; 

5315  Q  =  FNN(B0.'  60) 

5320  B0=60*Q 

5325  B=B0 

5330  IF  B>14  THEN  5330 

5335  Q  =  4 . 248-1 . 1 4£3*BO+0 . 1 0259i  30  r2     . 0030247*B0t3 

5340  B=E0+Q/(2. 1463-0. 20513*30+3. 009074 i *B0t2 ) 

5345  GOTO  5330 

5350  nisP   "CNVL  HRBNcflEG)"; 

5355  Q  =  FNN<E/60.:' 

5360  E--60*G 

5365  B0=B 

5370  IF  Bn4  IHEN  533m 

5375  B0--4.  243  +  2.  1  46:;; -;-'  -0 .  1 0259 ;tB-1  2+ 3 .  0030247*Bt3 

5  3  S  0  B  2  =  B  J  ■  ( t;  3  ^  U  !-  ■  -  3  0  3  ■  - 1  2 

5335  G  =  B2+a:!  +  F  u.  J  1  3  ^  l  ? 

5  3  9  0  B  3'  ^  2  *  C 1  *  ]  .  3  3  ij  5 .  \ -  ■;  ,r  1.. 

5  3  9  5  E;  0  -  3  0  3  5  Ii  F  '-■  Q   -  C  :j  B  2  /' 

5400  niSF  •'UPBW  ERR(  [S^'O  "  ? 

5405  D2^FNllIi2 

5410  RETIJKI4  0 
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B  -  SITE  PREP  (cont) 


5415  R=21y 

5435  nior   "CHRi-iGE:  1~  i  ■..!.■..■  ?        ,  ■  Tdiri: '■  5 

5440  Q-FfUiy 

5445  GOTO  Q  OF  5450) 54, "0 

5447  GOTO  5515 

5450  nisp  "TaC'^"; 

5455  T=FNNT 

5460  N=G-T 

5465  GOTO  5515 

5470  DISP  "G.- TdJB ; 

5475  0^1G*LGTN 

54S0  Q=FNHC! 

5435  M==10t(Q/ 10) 

5490  T=G/M 

5515  niSP   "OHflMGE: l^G  'TH.  2=70"; 
5520  Q=FNM0 

5525  GOTO  Q  OF  5530)5550 

5527  GOTO  5560  ■  • 

5530  DISP  "G/TR':.dE:/K  ':' "  ; 

5535  Q^FNHC  i0*LGT<G.- H9 

5540  H9=G.- 101(0/10) 

5545  GOTO  5560 

5550  DISP  "hDDED  noise   ■ K) " S 

5555  H9=FnHH9 

5560  RETURN  O 

5565  R^220 

5535  DISP   "HNT  PT  ERR :  1  =  DEG  h  i^-=".MPEiUM"  ? 

5590  O=FNH0 

5595  IF  Q-0  THEN  5630 

5600  IF  Q=2  THEN  5615 

5605  DISP  "DEG"; 

5610  GOTO  5620 

5615  DISP  HPBW; 

5620  D  5  =  F  N  N  ( D  5  ■+  Q  ^=  1 )  i-  D  5  *  6  0  O  0 ,  ■  B  O  ■■.  Q  -  2 )  ) 
5625  IF  Q=l   THEN  5635 
5  6  3  0  D  5  =  D  5  E  O  6  O  O  O 
5635  O2=60*D5*2. 7S4/B 

5640  E  5  =  (1  -  <  S I H '..  0. 2 1 1  S:  U  F'  1  >  ■  ■  C:  2  1 2  >  *  1 0  0  _ 
5645  H1  =  10*LGT(:  1+E5/10U  ■ 
5650  PRINT 

5655  PRINT  "HNT  PT  ERR  c  o  r  r  ti  Pond;  to  G-T  dn.tn  fit.  ( 3*  1 S -- SQR  ( #PTS  >  of"jHl?"dB 
5660  PRINT 

5665  DISP  HI ;  "DB:  0  =  TRV  hGhIH^  '> 

5670  Ul^FNNl 

5675   IF  01=^0  THEN  5600 

5630  RETURN  O 
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B  -  SITE  PREP  (cont) 


5£85  R=Zdi 

Z-cz'  DISP  "RMBIENT  TE!'IP';F)"5 

5?ia  Q=FNH<fl[3].-'ie> 

5^15  H[33=Q*ie 

Zrzd  DISP  "DEW  PT  TEnP  F  ■■; 

5~I5  Q=FNH<flC4  3^-l@> 

5758  HC4j=ie^Q 

5735  RETURN  0 

5740  R=332 

5745  DISP  "STORE  3?  T  ?  ri:  0=Hy ,  ^j^tXT?  1  y-^lHT"  5 

5:^53  Q=FHB2+FNHe 

5755  IF     HOT  Q  THEN  5?55 

5766  HCl?  1  j=Ri 

5765  H[l)2]=Fi2 

5770  H[£< 1 1 ]-B 

5772  N[2? 18  ]=P0 

5775  NC2jy]=E9 

5730  HC3?  i  j=Cl 

5735  H[3^4]=r4 

5790  HC3j5]=C5 

5795  Hr3j6]=C6 

5S00  HCS? 19]=Ce 

5305  HC3j  11]=L. 

5310  HE  4.'  i  ]=D1 

5315  HC4j23=D2 

5320  H[4?3]=D3 

5325  HE45 10]=D0 

5330  NE4? li ]-D 

5335  H[4!.5]=D5 

5340  NCe? 11 ]=F 

5345  NC7? 11 ]=G 

5350  HC7.4]^G4 

5355  N[7.-5]=G5 

5360  H[7?6]=Ut. 

5365  HC3j 1 ]=H1 

5370  H[S.'9]=H9 

5375  NUe?  i0]=F0 

5330  H[ 12?  5  ]=L5 

5335  HI  1256 ]=L6 

5390  HL 12?7]=L7 

5395  NC 12j3:=L5 

5900  NC12?9]=L9 

5905  HE  13. 11 j=M 

5910  HE 14?6 J=N6 

5920  H[2ej 11 :=T 

5925  HE  25. 11 ]-U 

5939  STCRE     DHlH  sQ.A.s 

5?:5  TRANSFER  ft-  TO  Tl9.1j 

5948  STORE    DflTfi  f 

5r-i5  STORE     DfiTfl  #Q.  lu  N 

5950  REWIND  #Q 

5955  RETURN  0 
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B  -  SITE  PREP  (cont) 


u4by 
5965 
5970 
5975 
59S0 

C|  q c- 

5990 

5  9  9  5 

6  0  0  0 

6005 
60 1 0 
60 1 5 
6020 
602  5 
6  0  3  0 
6035 
6040 
6045 
6050 
6  Id  J  5 
6060 
6065 

60  70 
6075 
6030 
6035 
6088 
6090 
6  0  3  5 

6100 

6105 
6110 
6115 
6120 
6125 
6130 
6135 
6140 
6145 
6150 
U55 
6160 
6165 
6170 

61  75 
6 1 80 
6135 
6 1 9  0 
6195 
6200 
6210 
6215 
6  2  2  0 
6  2  2  J 
6  2  o  0 
6  2  3  5 
6240 
6245 


■'■■<F  .-  TC  T ,  18  ]  +  100)tS 
![  1  s  1 S  J  *  1  03 <  1  ) )  *  ( T[  I  ?  7  ]/  1  E  +  03-:-Ti: 


t'lFlT  M  =  ZEF;[  10,  20  j 

FOR  r^a  ro  Ni 

0  =  C-'T[  I  J  15  ]/ 10 

S^=T[  I «  6  J.  1E  +  03+  ;■  ;  i, ,  i-  \  >  i\  ^  ].r  r  n 
Q2-E/;p'::-l  [  I  n  It,  ],■  :  E  Mj:i-.0  '  ^  BL  I 
15=81  I  .  1  J  M  [  1 ,  3  ]   :  i:  :i  r3  ^  S;  I  ■  1  1 

N  =  S+(  (  (F/TC  I .  IS  i^iOiV:'    ;  -  1   

H3~f +  ':  (M.Mj/'-^fKi;!  >  •  EO  iOu 

n^=EXP(-T[  I 16  l/lF -0  rHr.i  +  i:;::;*';i-i3..  l  i;  I  ?  13  ]+l00>  tH 

T[  I  ■>  10   Q2  .'/i;'2  13 

ELI?  4  ]-^n2 

H[  I  ?  1  J  =  T[  i  J  10  ]/ 101-3 
NEXT  I 
SFLfiG  1 
RETURN  0 
R  =  224 

LO=L    -  — 
N0=1 

Q-FHC';  1 )  -fEN82 

F'  R I H  T  T'  H  B 1 3  ?  "  T 't'  F-  i  C  0  L  V  I  'l  F  0  E  S  i  '  o  r  G  '  T'  N  E  R  3  U  P.  E  N  E  N  T  u  s  i  n  -^i  €  h  S  Fl ' 
Q^-^FNS2 

EORNrFT   "         G  i  UPEE  tFF         RFiL  EPF 

N F-:  I T E  ( 1 5  H  iE: 0 7 O  > "  h H T  i\ i  'b 1 1  r  i ;i \\ \; i .  h f  E,; N        E F F  h R E Fl " 

F  0  R  I'l  Fl  T  F  6  „  2  ?  F  3;  „  i.  .  "   I . "  ?  f^  ' ,  h  ,  \-  ]  q  . ,  f'  11.4 
N  R I  T'  E  ( 1 5  H  6  0  ;3  O 1  0  L  G  T  i;  "   .J  "  ^  T  ?  E  2  ■   3;  ?  B 0  ■ '  6 lO  ^  E  '  6  0 
FORMFFT  /  J ,  3 1  >■! ,  "  !  n  it  c  f  n  ,0   E 1  ^;  ^.^  ^=  - ,  F  3 .  1  ?  "   de  =3 "  * 
NRITE  (155  6033:0,.. 
FORMFiT  3Xh  "  PFiRHNETER  "  ?  EOF! 
WRITE   (15h  6095::' "ERR  TO  G/T" 
Q=FNI2+FHK1+FNE1 

NRITE   (15h6275)"F       FREQUEHC'i  (GI- 


]     lE  +  i: 


3" ?  Fie. 4: 


E9.  1 


S-TL  1  ■<  10  ].  -10 
NRITE   ■:.  15.  6235)  " 
FORNliT   IOXj  2FS.  1 
WRITE  ( 15n  6125) " 
FORNFiT   lOXj  2E10. 


" ; Fs  FO?  E0 
FLNF:  ■,  F.  U.  =  10  t-(--26)N) "  ?  S[  1  ?  4  ]? 


NRITE   (15h  6135) 
NRITE  (15 J  6275) 
WRITE  ( 15.  6220)  "  V  .  ds) 
FORMFiT   16X5  F6.  1  =  2F6„  2 
Q-SQR(E1^'E1+ES*E3  rF  9*E';i 
Q=K1*K3*K9 
NRITE  ( 15. 6275) "E 
NRITE  (  15.  6235)  " 
NRITE  (15.  6235)  "II.,:  I  t  !■  ■  .i' 
FORNRT  lOX. 2F5. 1 
WRITE  (  15.  6135)  "m.u  ti-  .::E 
WRITE   (15.  6135)  "...1  n  Ei  i  = 
WRITE  (  15.  6220)  "si  r .  '::.< 
NRITE   ( 15.  6135)  ".;:i,nl-   '  r 
NFIl  1:  (  15.  6135;'  ■J.,  1.1  i-:...,,  I  I 
FORNrlT    lO!'.  2F7.  3 
NRI  l  E   (  i'-'  6305)  "i:, 
NRITE   '■;  3  5-  6305)  "F 


I  ( i,.i.rit.  )   -  ■  ii  ■:  T  - 

■■El  :i  '  V-1  :'*T -  G.  "  K" 

I'       Y-4  ■■|i::T0R 

)  ■-" .  10*lGT(  V) .  "  dB 


TTH,  iiHEOEPTIOm  FFiETjE"  ?  K 
:h  .1  :■  1,       .  G -^ii,  I  ;  "  do" 
■    '  I-  n       !  G3:':[„::::  i-G EE?  " 


1  H  El 
=3   +  ri  t : 


i'  -'„:i  ;;  "  i,. 


"  H  r  0  s  ■■  |. 

';  i:  ri'-      -"i-,r  3  ]  d,0.  "  F" 

i-,.  in'    •  .  Ill    I  10. "  F" 

DIEFIEE.  '  ;  ]>':::•:  "  a  (  1  4(3-1  ) " ;  K3! 

Rl  l-EFuM  "  ;  ir''  "  '  ':,  1  ■  [,9-1  > " :  K9! 


F  ORilH  T 
WRITE 
WRIl  E 

NPl  fP 

FORriM  r 

WEI  i  E 
FiiF'T'E  r 


ox.  2 F 7.  -I 


T  .iMll: 
I.I     I  'M 
(■  Ml! 

,    1  - 


E2.  E 


■  I- " .  I  •  : .  j 


3  .  3  2"  1 5 )  f  ■  I  .  ii 
iiX.  "iiPBII  +■ 


6270  NhllF    (■  i  5.  6265  );!!., 
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B  -  SITE  PREP  (cont) 


6  3 1 0 
6315 
b328 
6325 
6338 
6335 
6340 
6345 
6350 
6355 
6360 
6365 
6370 
6375 
6330 
6335 
63'?0 
6395 
64  00 
6405 
6410 
6415 
6420 
6425 
6430 
6435 
6440 
6445 
6450 
6455 
6460 
64  65 
6470 
6475 
6480 
6435 
6  4  3  0 
6  4'?  5 
6  5  0  0 
6505 
6510 


FORMHT  5XjF11.3?  "  +-%F6=2? 
WRITE   ■  15^  62" 5  J   r  J     kImLUii  Ei 
FORNFiT  5:^::<  Fl  I  .  I  »  F6.  2  -  ■ 

PRINT  "  bo-ndwidth 
FORNRT  10Kj2F6.3 
Q2=T*<Y-i ) 

FORNhT  5X' F5=  3?  F10.  3?  "  -i--"jf 
WRITE  (15' 6275;'  ■■r:4  niFF  ?'r 
FORNRT  5:s  F7  =  4  -  F^.  -  .  '  ,  f  r 
'■15?  63  i  5 ')  "  t-'i  ftr 
15?  6235;'  J  r 
15?  6275;'  "K': 


!-fiCTO! 
?  "  +- 
:lHz" 


Ti'1  KFSPijMLt  FriC 


TOTAL  tRROR?   quad  supi  +  diffL 
5;'i2^Elt2  +  E> 


WRITE 
WRITE 
WRITE 

WRITE   ■::  15?  6275;'  K 
WRITE  a5?6295;'"i 
WRITE  <  15  J  6295) "V 
WRITE   ( 15' 629^-  ' 
WRITE  (15? 623^ 
Q-FNI2 
FORMHT  5 
WRITE  (1 
Q=FHS12 
RETURN  8 
R=^225 

IF  FLHGl  THEN  6400 
Q^FHJB 

niSP  "LIST  RLTERNRTE  37 
INPUT  Q 

IF  Q=0  THEN  6990 
Q=FNC1+FNS5 

PRINT   ••         STRR"TPP14  T 

PRINT  TfiB43; " K2 " 5 ThBSO 5 

FORMRT  6:;-        '  K  ' " 

WRITE  (15? 6430) 

PRINT 

J=l 

FOR  fi=l   TO  Nl 
TRANSFER  T[fl? 1 3 
Q=l 

FORNRT  F2.0?FS.0 
Q=FNER 

NC  H?  2  ]  =  CS*Y5/180 
NC  R?  3  ]^E4 ■ 100 
N[  R?  4  j  =  E2.  100 
N[  fl«  5  ]  =  E7.-100 
Q2=(Y-1  :.*T 
WRITE   (15? 6465) n 
NEXT  R 
0-FNS4 


TEN 


'0iNT';+--;ii5;  ••  , 

T  dat.n  fit::^  +  -"?H1 
iiT  F'ULRRIZHTION  Ffi 


" ;  K 

"  +- 

J  S "?  /' 

"dE" 


E4?  E4 
pe.  2? 
K5?  E5 

E6?  E6 
E7,E7 


;H9?Ii3?Ii3 


■■2+E4t; 


2i; 


ii-Et 


Ft.  2: 
. t-  7 ■+■  •-' 


,  F. 
.  T-  ri  r 


"mhb:: 

THB62? 


1 ; 


i  nt ;' 


V(dE 


K"5F8 


Fll 


F8- 


[in- 


;:':Lu 
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B  -  SITE  PREP  (cent) 


6515  F:=226 
6520  NS  =  Rr  '-:] 
6525  H9  =  R[ 4  ] 

6538  fl[ 1  ]  =  2 

6555  HE  2  1  =  3 
6549  hC3]--=4 
6545  H[4]  =  5 

6556  HC5  1-6 
6555  X2=-l 
6569  X2=X2+1 

6565  IF  X2  =  5  THEN  65;'5 
6579  IF  H[X2+1]#0  THLH  uSoU 

6575  FORiIHT   r?;:<"G  T  ...r    C  IM     llfiHiuKi^lltiiT  ERRORS:  RLE 

6539  NRITE  a5<6575H 
6535  Q=FNE1 

6599  FOR   1=1   lu  5 
6595  h[ I ^  6  ]-M[ ! »  7  ]^9  . 
6699  HEKT  I 

6695  RRIHT  .  . 

6619  R[6]=25 

6615  H[7j=35 

6629  flC  S  ]  =  45 

6625  H[9]  =  55 

6639  FlC  19  ]=65 

6635  FOR  Xl=l  TO  X2 

6646  I=Fl[>:i  ] 

6645  TRANSFER  TC I ? 1  ]  TO  St 
6659  RRINT  TRR  <  fiE  X 1 +5  ]  >  ?  S:r ; 
6655  NEXT  XI 
6669  RRINT 
6665  PRINT 

6679  FORNRT  FS.2j"  ■;"?FS.25"  ■r'?F3.2'"  °. 'SFS.25"  "."iF: 
6675  PRINT   "E-S       FLUX  'i 
6689  Q  =  FliTl 

6635  PRINT  "E-F       FREuUENCi'  "I 

6699  Q=E9 

6695  GO SUB  6795 

6799  GOTO  6770 

6705  FOR  Xl^i  TO  X2 

6719  WRITE  a^!' hb7u':'Q; 

6715  l■i[X^J6]  =  r■![Xl^S]  +  0 

6729  MCXl5  7]=-MCJ-aj7]fi:!l2 

6725  NEXT  XI 

6739  PRINT 

6735  RETURN 
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B  -  SITE  PREP  Ccont) 


6740 

FOR  Kl=l  TO  K 

■-■ 

6745 

I=FlC  Xl  ] 

6750 

NRITE  (15.667 

0)riL  i 

6755 

NEXT  Xl 

6760 

PRINT 

6765 

RETURN 

6770 

PRINT  "E-r 

Y-FAl. 

TOR 

6775 

Q=FNT2 

6  7  SO 

GOTO  6815 

6  78  5 

FOR  Kl=l   TO  y 

V 

67'?0 

I  =  Rr  XI  ] 

6795 

NRITE  (15.667 

nr  1 H  7  ];■ 

6800 

NEXT  XI 

6805 

PRINT 

6810 

RETURN 

6315 

PRINT  "E-Kl 

ATM  T 

RAN?  FhC' 

6320 

Q  =  E1 

6325 

COSUB  6705 

6330 

PRINT  •■E-K2 

STAR 

SHAPE 

6  8  3  5 

0=FNT4 

6840 

PRINT  "E-K3 

BNTNIi 

EFFECTS 

6845 

Q=E3 

6350 

GOSUB  6705 

6855 

PRINT  ■■E-K4 

niFF 

SYST  TENI 

6860 

Q=FNT3 

6365 

PRINT  "E-K5 

RNTEiJ 

NA  pniNF 

6870 

Q=E5 

6375 

GOSUE  6705 

6830 

PRINT  "E-K6 

ANT  P 

OLRRZ 

6385 

Q=E6 

6390 

UOSUB  b705 

6895 

PRINT  "E-K7 

SYST 

RESPONSE 

6900 

Q=FNT5 

6905 

PRINT  "E-K8 

ATM  li 

IFF  Lis 

6  9 1 0 

Q==E3 

6915 

UOSUE  6705 

6920 

PRINT  "E-K9 

ATN  R 

EFAC 

6925 

U  =  E  9 

6930 

GOSUB  6705 

6935 

PRINT  "E-To. 

NO  IS 

E  ADD 

6940 

Q=D3 

6945 

ijOSiJB  6705 

6950 

Q=FNI (2> 

6955 

PRINT  "TOTAL 

LINER 

R  SUI'1 

6  9  6  0 

GuSUB  6740 

6965 

PRINT   " TOTAL 

QUADk 

ATIC  S:JM 

6970 

GOSUB  6735 

6975 

A[ 3  ]=N3 

6930 

H[  4  ]=N9 

6935 

i!=:^FNS27 

6990 

RETURN  0 
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B  -  SITE  PREP  (cont) 


6  9 

9  5 

f. 

I'y 
7'  i 
70 

y  a 
05 

I 

G 

0 

-iili2 

TG  39  75  ■ 

i'  rj 

10 

1 5 

F 

r 

E 

r  FHi: 

70 

20 

H$ 

FilF 

70 

■~  it:' 
iZ.  -  J 

E 

$ 

-  ''    1  d  : 

:45t 

70 

\^ 

UTG  Q 

OF 

70 

Hi 

--HE  1 , 

1  ] 

70 

40 

H 

2 

-HE  1  J 

C.  J 

70 

45 

f 

3 

=^4-!E  1  , 

3  ] 

7  0 

50 

E 

HE  2.  ] 

1  ] 

70 

cr  -1 

■-'  iZ. 

E 

0 

•^HE  2, 

10  ] 

70 

E 

1 

^NE  2) 

1  ] 

7  0 

E 

=  HE  2 

2  ] 

7065 

E 

=  HE  2; 

3  ] 

70 

7  m 

E 

=  H[  2. 

7  ] 

70 

E 

=41 E  2 

8  ] 

70 

80 

L 

Q 

^NE  2 

9  ] 

7  0 

c 

HE  3,11  ] 

70 

90 

L 

0 

=^H[  3 

10  ] 

70 

95 

i; 

1 

=  H[  3 

1  ] 

7 1  y  0 

il 

==HE  3 

2  ] 

71 

05 

r 

3:  ] 

7110 

c 

4 

^^lE  3 

4  ] 

7115 

il 

=^41 E  3 

5  ] 

7 1 

20 

c 

6 

=  H[  3 

6  ] 

71 

c 

I' 

-HE  3 

?■  ] 

71 

3  0 

L 

=  HE  3 

3  J 

"I  H 
I'  i 

■~:  C7 
■-' 

c 

9 

] 

7140 

B  = 

HE  4'.  1  1  ] 

7145 

I 

0 

.::H[  4 

10  ] 

71 

50 

ni 

=  H[  4 

1  ] 

71 

5  5 

I 

2 

=  HE  4 

2  ] 

71 

60 

ri3 

=  HE  4 

I'  J 

71 

65 

4 

-HE  4 

4  ] 

71 

70 

ri5 

=Hl  4 

5  ] 

71 

— '  c' 
1 

ri8 

=  HE  4 

71 

SO 

r 

i9 

=^Hl  4 

9  ] 

7185 

E 

HE 

1  1  ] 

71 

90 

f 

"0 

■■=HE  6 

10  ] 

71 

9  5 

Fl 

=  0 

00 

f 

■  '-I 

=  HE  6 

1  4  ] 

05 

HE  7,  1 1  ] 

10 

G4 

=  HE  7 

.  4.  ] 

r'  iL 

15 

=  N[  7 

<  5  ] 

20 

L 

=  HE  7 

-  6  ] 

..J 

H= 

HE  b, 

1  1  1 

30 

\ 

il 

=^HE  8 

.  1  J 

OJ 

HZ 

=HE  S 

'  J  J 

40 

H9 

=  NE  S 

1  9  "1 
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B  -  SITE  PREP  (cont) 


L-N[  12::  5  1  1  ] 
725U  Ll=Hr 12^1] 
72'i5  L5  =  NC  12:.  5  ] 

7265  L7-NC  3  2?  ] 

7270  L8  =  i-iL  12?  3  ] 

7275  L9  =  N[ 12,9  1 

7230  N  =  N[ 13,  11] 

7235  N  =  hl[  l-i»  1 1  ] 

7230  H1=H[ H )  1  J 

7295  N5=3 

7300  Nb^^Ni:  14^6  ] 

7305  N7  =  H[ 14?  7  3 

7315  T=:M[  20?  i  1  ] 

7320  N^-IIC  23?  i  1  J 

7325  TRRHSFER  T[  9?  1  ]  ''0  r$ 

7330  RETURN 

7340  PRIHt"  THB  -il  ^  , ■:i]i.i::.T3 " 

7345  H  *  -  "  Fi  B  C  D  E  F  In  H  i  J  i- I.,„  i ' i  i  \  0  P  Q  k  S 1  <J ' / 1.']  >i  -i'  Z ' ' 

7355  01=^0 

7360  Q2---10 

7365  FOR  1=1  TO  26 

7370  FOR  .J=l  TO  11 

7375  IF  H[ I s  J  ]  =  0  THEN  7435 

7330  Q1=Q1+1 

7390  IF  02^55  THEM  7400 

7395  Q2=ie 

7400  IF  Qi#]   THEN  7420 

7405  PRINT 

7410  PRINT 

7420  PR  I \n  TFiEM2  ?  R  f  [  I   1  1 ::  [■  i  i.  ,!  ■  J  J  ?      " ;  hii  1  ?  J  ] ! 

7425  IF   INT(i;Jl  ■■3)--01/3  THEN   ?'4  35 

7430  PRINT 

7435  NEXT  J 

7440  Q2=-10 

7445  Q1=y 

7450  NEXT  I 

7455  Q=FNS2+FNI5 

7460  RETURN  O 

7465  R-229 

7470  DI3P   "WHICH  PRCC     CONST  uE^^^^^STORE/'EN  IT  V' 5 

7475  INPUT  S*C 1 ?  2  ] 

74S0  IF  Si[ 1 ? 1  ]="0"   THEN  7525 

7435  I  =  POS(fl:f  ?  S:fC  1  ?  1  ]) 

7490  IF   1^0  THEN  747 U 

7495  B$=" 1234567390  " 

7500  J  =  P  ij  S  ( B  *  ?  3  ;:|;  [  2  ?  2  "I 

7505  DISP  "NEN  VRLUE:   NON"  ;  \\i  I J  1! 

7510  INPUT  NL I <  J  ] 

7515  Q=FN03 

7520  GOTO  7470 

7525  R^^^230 

7530  DISP  "Si  ORE  N:    0:-N0  ?  S^^^^EXT  COS.::;  ^  1 0  j;  NT  CRSS"! 

7535  Q^-^FNiUO 

7540  IF  Q  =  Fi   THEN  7553 

754  5  STORE     HHTH  IIu?  10-  N 

7550  GOTO  ,-'525 

7553  0^^'FNOl 

7555  RETURN  O 

7560  GOSUB  7  035 

7565  RETURN  0 
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B  -  SITE  PREP  (cont) 


mSP  "ELrV  '/e;  GM 
Q=^FNo3  +  rNM0 


I  F 


NOT  Q  THEr] 


7590 

Bl-H-0 

7595 
7  b  0  0 

Q=FHC3 

Il$  -:  "  il.     f  .  i.M  " 

7605 
7  ti  1 0 

FOR   L-^1   TO  HI 
TRMN8FEP  T[ I h 1 

]  TO  3T 

7015 

PRINT  riiC  I  ?  I 

■■   =  'SSI. 

7  620 

NEiTT  1 

7625 

PR  IN  T 

7630 

FORM  AT  27;-:j  "SO 

UPCE  ElE  V  ■'.  de  -3  " 

:i  /  .  /  ?  F  1 :3  . 

0r^F5 

7  6  3  5 

NRITE  (15.7630 

El  <  1  0  <  3:  El  >  3' El  ?  40 . 

0  -1  6  0  H  7  f  i  1 

•P.  0,90 

7640 

FORNRT  9" 1  ... . 

7645 

OUTPUT  <fl$, 7640) " " H 

7650 

NPHE  (15^7745 

■  H  Ri  5 "  OR 

7655 

El---y.  5 

7660 

El-El+0. 5 

7  6 5 

IF  El, -24  THEN 

7  '7  S  0 

7670 

R  tT  1   63  1="  ■' 

7  675 

nil  13' 13  J-"  1 " 

7  6  8  0 

H$[  58  J  58  1^^  -  !  '■ 

7685 

FOR  N0=^6  TO  1 

STEP  --l 

7  6  9  0 

IF  8[N0h2]=:0  T 

HEN  7715 

7695 

Q=FNhH0 

7700 
7705 

IF  L:0  THEN  77 
U-L  -2  +  13 

15 

7710 

HTI  n,  Q  ]  =  ri$[  NO, 

NC^  J 

7715 

NE;rr  ho 

7720 

"?  ":■  ■-  r: 
I  I  i:.".  J 

FORNRT  F4.0 
IF  El-INTEi  IE 

lEN  ;'7-i0 

7730 

OUTPUT   (RiT  1  ^5 

i  ].  7730;iEl  - 

r'  r"  5 

OUTPUT   '  RfC  59h 

63  1 ;  -"rEO  '  E  i  J 

7740 

NPITE   <  15.  7:-l^:: 

7)0  J  ^ 

7745 

FORNRT  F7. 2?  PS 

1  _ 

7750 

NRITE  (15' 774^:: 

i  j  E  .  H 

-?  cr  c:r 

1  r 

G  0  T'  0  7  fc.  6  0 

HTI  1 ^  72  ]=" " 
OUTPUT   (RT[  13  ]) 7E40 
NRITE   (.  15,  7745;M■;^ 
Q-FHS3 
RETUI';:N  0 


9000 


G  Q  \  LI  9  9  9  9 


202 


B  -  SITE  PREP  (cont) 


R  1  .J72S 

4170  4190  4  4 jy 

57' 40  5 '4  60  i:j040 

H           1  fc450  e4S5 

650J  7750 

fll         1  4070  57^0 

h2         1  3840  57r:S 

R  3         1  7045 

B  1  3765 


'  j     7  0  4  0 


;  1 5 

^;il0 


'40 


■4  y 

01 


■1 115     414  '5 


B0  1 


El 
B2 
B3 
B4 
B5 
Bt 
B7 


00 
CI 
C2 
C  3 
04 
C5 
Cb 
C7 
03 
C9 
D 

Il0 

LH 


5630 


5295  j29: 

5300  5  33t 
0195 
4075 

7070 
7075 


4430  4':^00 


4085 
7105 
4430 
4480 
4370 
7125 
6145 


40;  III     40:- 1.. 


:::  i  0     7 1 ; 


0 1-5 II 


10 

;  4  0 


^10 


005  7n6! 


T   o  c: 


:00      I f y0 


;5  7110 
:'0  7113 

'0     4 0  80     4380  4400 


0n     5;-:y5  0b20 


,  M  y  'j      ,■■  M  h  n 
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B  - 


SITE  PREP  (cont) 


ri2 
ri3 
r.i4 
ri5 
ns 

1)9 
E 

E0 
El 

E2 

E3 

E4 
E5 

E6 
E7 
ES 
E9 
F 

F0 
Fl 
F2 
F3 
F4 
F5 
Fb 
F7 
FS 
F9 
G 

G4 
G5 


3795  5465  5 
5326     h355  h 


7165 
3315 


5  fj  2  0 


3350  6230 


41' 


405  5315  6270  7155 

355  6940  7160 

i620  5620  5630  5630 
'  i  7  5 
'  1 3  0 

■360  4365  4320  4360 


5     611 0 


'60     4245     4315  6160 


;60     7660  7665 


6160 
7  7  3  0 


3  3  00  4'  3  9  0 
6370  6435 


4230 


::805     4095     4310     4355     62  Si 


3310  6310  6316 

3  3  20  4100  4  3  6  5 

3340  4105  6335 

3345  6160  6163 

3  3  5  ti  616  01  6 1 6^  0 


6370  6430 
4370  4370 


4340 


o305     51;:  20 

c;  u  Ci  tr  o  c,  c 


5;:::  4  a 
7195 


5210 
3720 


6  0  0  0  6 1  1 0 
5i-;75  6000 


:!0 


6320  7170 


'0     6170     6370     6320  7655 


4  33  J 


\Q  5645 


:-;n 


4  ■ -1 ■'       b  C  J  0 


320     6320  6370 


6  9 1 0 


6370  6490 

6225  6370 

6230  6370  6925 

5230  5300  5330 

H  ri  ir 
i  i  O  -  J 

6110  7190 


1  c:.        cr  ■■ 


:i340 


4125     4  140     4140  41 


■  1  b  5 


7  2  0  0 


3  3  3  0 
7205 


53';i0 


6  0  3  5  6140 


6130 
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B  -  SITE  PREP  (cont) 

Gt"  3  5860 
h  3  7225 

Hi         3  5645  '  .35 


5535 

:- .  ."0 

6355 

r'243 

454^1 

.-  -y 

4550 

455" 

'  :^  0 

4555 

4555 

4555 

4560 

^  ■ -  _r  cr 

4^  - 

f - 

4570 

4570 

4530 

4580 

-  23 

47I6 

47^," 

"  if  J 

4735 

4735 

4735 

47^0 

^50 

4755 

4755 

4735 

43.i5 

-^330 

4835 

483" 

-t350 

4358 

4355 

59"0- 

5975 

5930 

5930 

59  : 

5990 

5990 

5995 

5995 

5995 

5995 

6005 

60^5 

b  3  i  'lI     z  Li  L 

6020 

6025 

6590 

3595 

6595 

6feuy 

6640 

6645 

6745  tTSO 

6 .  rU 

6795 

7335 

7375 

7420 

:^420 

7426 

7450 

7435 

7490  7505 

7510 

7G05 

76i0 

7615 

7615 

i-'62f! 

5990 

6085 

3 

3935 

3940  395!j 

3950 

3955 

3955 

4c30 

4355 

4355 

6445 

7370 

7  3  i"  5 

7423  7420 

7420 

7435 

7500 

7505 

7510 

Jl  3  4340     4350  4355 

K  3 

Kl  3  3760     3310  -6165  6170 

K2  3  3300     3810     6250  3530 

K3  3  6230 

K4  3  6318 

K5  3  6320 

K6  3  6330 

K7  3  6335 

k3  3  3810     33  - _   . 

K9  3  3818     xy5M     6i65  62xy 

L0  4  6045 

LI  4  7250 

L4  4  6175 

L5  4  5380     6133  7255 

L6  4  5335  ti: 

L7  4  5396  6[_ 

L3  4  5895  63- 

L9  4  5900     -  _         ^  _ 

M  A  5460     51         V  : ;05  7236 


M  i  4 
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B  -  SITE  PREP  (cont) 


M2  4 
f13  4 


5  9  9  5 

t  IJ  U  0 

K,:,U0 

3  30  5 

.  o5 

m 

4 

374  5 

'■.<^-  i  11 

;■  3  ■  0 

'i  3  3  3 

J  -45 

4  96  5 

?  c- 

49'r'0 

'  ■;  0  0  0 

^  M  n 

1 1 .  i  1 

i  '.J 

-"'     :'  U 

3  1  i 

J  1  *  0 

C-  i    -,  Q- 
•J  i  ul  J 

5160 

51  ,'^'L1 

t..ki50 

r  C-  'r'  L"" 

r  1  3 

7  7  1  0 

1   1  1 

n.  1 

d 

"4  ._i  ^  1- J 

'4  i  -j 

'r\ '  ' ,  h  i 

t.i  '-t  -J  u 

r     9  L1 

\  t'  .1' 

h  J 

11.- 

A 

'-T 

hi  ■" 

6  0  0  Tl 

!  ^  "-t 

A 

J  1   1  11 

11 J 

A 

Nb 

4 

4220 

4220 

''5 i  i  ;1 

3  0 

N? 

4 

7305 

^■^a 

4 

6520 

69  75 

H9 

4 

6525 

6980 

p 

5 

PI 

cr 
.J 

3795 

G'  0  0  0 

6  2  6  0 

Q 

cr 

.J 

3  7  0 

3  3  6  "i 

I'-;  '"J  2 

2-  :/:' 3 

.'  300 

3905 

3910 

■-' 

3  Z 

39^3 

3    ::  ■  O 

'3  9  '9  Fi 

4010 

4045 

4065 

"]■  i  ■  :;■  5= 

4  160 

4205 

4210 

'■t  i;! 

4  2  0 

4  J00 

4315 

4320 

4  295 

J  435 

4453 

44 

4460 

4565 

4570 

•  c  r.  Er 
■■  •1  .1  :r  .1 

4  6"^:::i 

4  3. 3  0 

4. 6  7  0 

4675 

4  ,-'00 

4-  i 

"  3 

d  7'  y 

4 ' ::' '  J  3 

4945 

.1 9  2. 5 

I:  k ! 

1  '.I'l  ij 

4:.MMj 

4990 

5  0  0  0 

5'  0    r  0 

'r  3  6  tl 

5870 

'j  0  £;  0 

5  1  Hil 

'  .1.  1 1  : 

'j  1  30 

5160 

00 

5330 

cr     ri  c; 

5315 

532u 

-1  0 

5330 

5440 

4  5 

5475 

3  A  30 

5  4  S  0 

5435 

5 !  2  t:i 

5540 

5  5  0 

c^v  'J:, 

5 17  2  Ci 

5625 

5710 

57]  5 

3  3  ■ '  f  1 

5750 

5  9  3  0 

"'i  3 

0 

Q  .1 

5350 

5  9  7  5 

5930 

'  i  Q 

'■'  '-'I 

r- '  1  !  !■  ■!  3 

6010 

3  0  3. 3 

■;■  I 

3  1  ii' 

6360 

6  3  7  5 

rOtlU 

3415 

6  4  0 

6  4  7'  ■} 

i    7;  3. 

6690 

6710 

6715 

3  3  2  0 

6  3  5 

6  - 

3  3 

3. 3  3  3 

6900 

69  1  0 

b  925 

r  i  '-l4  i4 

7  000 

7015 

■■;  p 

7515 

"7  cr  cr 

7545 

7  530 

7  5  9  5 

7  7'  3  5 

7710 

7710 

r  r  i' 

Q0        5  3730  3735  3  7' 30  4935  4  993  5010     5015  5355     5065  5065 

5070  5  0  9  5  7i  1  i.J  3  3 1 0  3  3  i,  1  0  5'  1  5  5  5 1 6  0 

Ql         5  3735  3790  4  ::::70  4  ;.;:5  4355  4373     4665  4673     4  343  4350 

5015  502  0  5  3  3  3  3  i  i  7  3  3  3  ;  3  '  "  7  7  0  5  6  7  5     '7  3  3  3  7  7  3  3     7  3  3: 3     7  4  O  0 

7425  7425  7445 

Q 2         5  7 7' 0  -'7  3  ■ ' ; ' 3 3        ■'  ] L' 2 0  :"; 3 2 0     4 7: 2 4  ' 7 3     4 3 3 5     3 3 3 5 

5640  564  0  5 ■  I ; 7.  i , : ii  ;  ;j  i :  7 ■  j  3  1 5  3 3 33     6 4' 3 3  3 3 3 3     o 5 3 3     7 '  ■ ; 3 3 

7335  7335  7333  7395  7  4  .JO  7443 

Q3  5 

Q4  5 

Q5  5 
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B  -  SITE  PREP  (cont) 


Qb  5 

Q7  5 

Rl  5 

R5  5  4120 


So 


>930     5385     59-?5     i-j  15     6128     6128  63, -'a 


T  5  3830     5455     5455    5468     5490     5929     6885     SI 38     6148  6388 

6495  7315 

Tl  5 

12  5 

T6  5 

T9  5 

U  5 

Ul  5 

V  5  3948     3945     3958  3955 

VI  5 
V2  5 
V3  5 
V4  6 
V5  6 
V6  6 
V7  6 
V3  6 
V9  6 

W  6  3385     5258     5258     5925     6298  7328 

m  6 

X  6 

XI  6  3938     3935     3968     6635    6648     6658    6655     6785     6715  6715 
6720     6728     6725     6748     6745     6755     6785     6790  6888 

K2  6  3938     6555     6568     e5fc  8     6565     6578     6635     678^     6740  6735 

X5  6 


6  3838     3o35     io-''     Lj;:y       ;4u     6145  6] 

6588 
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B  -  SITE  PREP  (cont) 


FHH 
FHB 
FNC 
FHD 
FHE 
FHF 
FHG 
FN  I 


4460     ba55  64:15 


;745     6iM':::.  64? 


■960  514y 


4460  443!:i 


i-6  30     47'P0     4790     6195     6360     69  j0 


FN  J 

FNK 
FNL 

FNN 
FNN 


FNP 
FNQ 
FNR 
FNS 


3  ?  3  U  3  7  3 1:3 
3  7  3  a     3  9  t:i  a 

6105 


7  3  9  9  0  'i- 1  '3  5 

4975  49S5  5000 

5200  5220  5240 

5440  5455  54oa 

5750  7535  7 590 


JO     3730     3i''30  3730 


0     3  7  3  0 


3  4010  4045 

4790     4945  4yCa 


;:20  4453 


■i  i- ?    !;!      5 1! 

:i  5  'z>  0     5  6 ; 


•:0  46, 
■5  b4l5 


"0  5710 


700     4  770  4,''9U 


FNT 


3 9 2 5     6 b 8 0     6 7  ? 5     6 8 3 5     6 3 60  6990 


FNN 
FN  7; 
FNV 
FN2 
H[  j 


6525     i:.5>-J      >  ")  <'< 

6630    664  a  triaa 
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B  -  SITE  PREP  (cont) 


ri[ 

FC 
GC 

M[  ]       9  -  3940  39rii;j  3'V:..j  .;     .,  ?-'55  5965  6475  o4yy  6435 

6498  6595  6595  ; ' ,  i  '  l  i'/20  C7?0  6758  6795 

N[  ]       9  5768  57i::/:i  5  7(8  5^  ,  5, "7 5  5788  5785  -5798  57:15  5888 

5 3 8 5  5 8  i  8  B  \ ' ^ i  " •  '  "  ' ;  ? 3 8  5 8 3 5  5 8 3  5 3A 5  5 3 5 Q  5 3 5 5 

5868  5865  'j3'.  i)       ...   .  <./'.<  '  8  85  5::;:-'8  58  95  5988  5 '■■18 5  5'':^  18 

5928  5925  ' j  ^  ■ '  -  7m  '  ,  '          6  4  5  7858  7852  7855  r'8b8  7665 

7870  7875  '■';■[•  ,'ir n  7895  7108  7185  7118  71  15  7128 

7125  7 1 3  8  1 .:  3  i  J.  -1 1; :  :  ■  1 4  3  : '  1 5  8     1 5  5  7 1 6  8  ?  1 6  5  : '  1 7  8  7 1  ?'  5 

7130  7135  7198  ;'2!-:>8  7285  7218  7215  7228  7225  7238  7235 

7240  7245  7258  7  2  "'9  72'-7J  7265  i'27e  7275  7280  7235  7290 

7300  ?' 3 0 5  7 3 1  9  i  ■  J ■ !  7  : 3 3'  2  6!  7 5 8 5  7 5  1 0  7 5 4  5 

3  [  ]       9  3  3 10  455  t;i  '-i-  7  2 '  j  4  ,  ■:  u  -1 10  4310  4'  3 1  8  4  3 1 8  4  3  i  8  4  5 1  kJ 

4  3 1 0  4  3 1  Ci  -  I-  9  :  3  ■  ] : . ;  ■ : :  i  A  3  ■■  8  4  9: 4  5  4  3  4  5  4  3  5  8  4^  3  5  0  4  3  7  5  4  3  9  8 

5800  582  9  ■  :m  '-'ii  hi  5^  '8  5830  51  18  5938  5935  5998  5998 

6815  6128  33  d  3  3tj-\^y} 

111       9  3325  4  I'M;  4  4'!             4  5  4558  4558  4550  4558  4  555 

4555  4555  'rj'.ii  9i    ■  ;'.    m  9  6i;!  -i568  'j'--'^-''  4578  45  78  4578 

4  5 8  4- ?■  5 3  -3.' !•  i  > l  /' '  ■ :  i  4 ' 1. 1: i  ■  1 2 8  4 3 3 3  4 3 6 3 3 5  4 y  3 5  ■.]■  9 6 5 

5930  5988  5V:.9j  9v''  m  9::-' 9 '-'9 5  59  95  5995  59'-:i5  6885  6885 

6810  6  0  2  8  6  i  1 5  6  4  3  3  6  3  3  ij  3  3  4  5  7  3  2  5  7  6. 1 8 

X[  ]  9 

Hf  3700 

FHU    ■  3365  4235  4260  4388  4395  4415  4435 

H$         3370  333 '5  •1298  '^343  47"' 3  4  255  4265  4278  4275  4235  429,5 

4385  4318  ^  J  9i  iiM'  :  i  4;i  44  28  4438  4448  "9;:,,:: 9  794  5  '  4  28 

7485  7645  7658  767ij  7b  i'' 5  7638  7718  7738  r735  7r-'48  7  i''60 

P$         4230  4240  425';:'  4  265  4  9  4235  4295  4305  4390  4460  4418 

4420  4438  44  4t:i  593':.  79. 9:9 

Sf         4545  ■8759  ^'3:i\  ■i.7'.i                    70  c\?33  6455  S588  6645  6658 

7475  7488  7't7;5  /■'jiji  i  ,  r, !  i :  ,  615 

L          5260  5268  6845  i:,.8',''i  7  9'.^!  9.,:  4  5  7788  7785  ?'7'50 

B*         7t'25  74  28  74  :'5  .  5bM 

Il.f         7600  7615  7' 7  in 
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8.5    C  -  MEAS 


-  ^TO  TRAP 

6ot 


210 


C  -  MEAS  (cont) 


211 


c  - 


MEAS  (cont) 
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C  -  MEAS  (cont) 


"Gy  Hj="NesiC.GS    NLiii      i^i  r::       .     f  ■ 

3718  REIiIM  FC2],Y[3],i.,[\:  .:  .  _ 

5715  flHT  M=ZERL4y-  16  1 

'2ti  Hi=4 

'30  ■Bl=K5=K6=i3 

"35  E6-fJ.*JUa 

5740  ES=S5 

5745  R5=ll 

5750  N=N7=ei 

5755  U=1+FHS3 

^60  CFlhG  1 

5765  CFLRG  5 

'70  FORHRT  "IF  HHRDl-ihRE  hnrlGb  U^"-    <    ^    <  1  > STOF+STOP 2 ) KEY  O' 

'75  WRITE  <15»3770>''.3^'y  ^RS■■RTr' 

^80  Q=FH32+FHB3 

57S5  GOTO  4700 

5790  DEF  FhF(Q> 

5S00  GOTO  Q  OF  7730 

5SS5  GOTO  7765 

5810  BEF  FHYcH3> 

5328  IF  m  THEN  3998 

525  IF  H0=6  THEN  3845 

530  K1=FH2<N0J 
33G5-  P=n[9]/10t4*EM'P-*:-lfi:  fbs  b  J.- 1 0t 4..' 

3340  GOTO  3355 

3845  Q=FHkH0 

3850  H1=2U0*K1/G 

3855  Y=1+K1*G/T 

3860  R1=T^H9 

3865  I5=(:Y-1>*R1^50 

5870  IF  N2#-3  THEN  3330 

5875  15=15/5 

5880  FGRMfiT  -ZE^'O  LE'  :  -  i'„  -L-"--  ^ian  K  'fajB^ 

3835  WRITE  <i5-:::e  t  th" 

5390  FORHhT  F7.        -Tl  -    ;  2F3 .  3?  FS .  i  ?  F7 .  9 -  2F7 .  1 

5895  WRI  IE  <15!3S90>R15  v^RIj/IjKj  iM*LGTYi.  K1*G5  S[  H8' 4  ]  -  r<H'=i 

5980  PRINT 

5905  PRINT 

5910  FOR  1=0  TO  5 

5915  PRINT  TfiB»:  18*1+5  ■ , 

5920  IF  H2=-3  OR  H0=0    n-!EH  39?=: 

5925  PRINT  20*15 

5930  GOTO  3940 

3935  PRINT  4*1-105 

3940  NEXT  I 

3945  PRINT 

53  FORMRT  10"  !   -    i  ' 

3955  H*="" 

3960  OUTPUT  «Hf.3950  / 

3965  FORHRT  "H3"j4H 

3970  WRITE  <15^3965n-,       ^i-;,'       Pi!-ii?     pxRn  " 

3975  IF  N2;-3  THEN  5935 

;9S0  Rl=i:'l-  ?'?  15 

5935  GO'"  I    -  : ;  ? 

3990  Q=Irj'/  .  F -PI -'-"I5-,-0,  ^ 

;995  P=INTa0t5*P-O  .  "  ^  'lOr' 

4000  IF  mES(N3-33  ■   F^'  P    'P  ,i     -        :;:   :  ^.PP, 

4005  N3  =  -fJ3 
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C  -  MEAS  (cont) 


4  U  1  i-j 

Bj-  =  ^'#"  ' 

4y  15 

G i"i  TO  4025" 

4020 

4025 

02=0  ■ 

4030 

H.t^"  "                 .      .  ■ 

4035 

HIC 1 ^  72  ]=" " 

4040 

f.ti  32?  32  ]  =  "  1  " 

4045 

FGRMRT  F3.0 

4050 

FuRMhT  F3 , 4  , 

4055 

UU  ri-'IJ  r     i-1  J  L  l•^  2  ] ! 

4060 

OUTPUT  ' Hi [ 57?  6- 

;  J  n  ,  1 1 . 

4065 

OUTPUT   '  Hf[  6'5..  7.: 

4070 

I F  Q   1   ij  F'  Q  .  6  £:  T 

\ih.\\  4ii3iJ 

4075 

Fl$[  Q  <  Q  ]  =  Pl  [  1  H  1  ] 

4080 

WRITE  a5?^045)H 

f  J 

4035 

N3-HB3H3 

4  0  9  0 

FORNRT  F9.5 

4095 

WRITE  ':i5?40y0:'P 

4100 

IF  N3<N4  THEN  41 

20 

4105 

fl$=" " 

4110 

OUTPUT  ':fl$j3950;. 

4115 

PRINT  THE6;flf 

4120 

RETURN  Q 

4125 

DEF  FNT<  I ) 

4135 

Q=FNR3 

4140 

Q  =  I N  T  (1 0  0  *  Q .  :  ^  6  U  0  -  l  0  .[  i  \  1 

4145 

IF   FLHG5   THFrJ   4  1 

J-    '               '        L-  1    1  'J                     (Ill  11           "  i 

r~  11 

4150 

T1=Q 

4155 

SFLHG  5 

4 1 60 

IF    I#l   THEN  4170 

4165 

tl=Q+E3+N4*E5-2+ 

4170 

RETURN  Qh-':  QvTl 

4175 

DEF  FNG':.Q> 

4190 

IF  Q  =  -99  THEN  4.: 

4195 

IF  Q;0  THEH  4205 

4  2  0  0 

M1=-M2  =  M5^:N9-V1  =  V 

4205 

N9=N9+1 

4210 

M1=M1+X2 

4215 

H2=M2+X 

4220 

H3=M3+P 

4225 

Vl=Vl+v2t2 

4230 

4235 

4240 

V4  =  'vM  +  P*X2 

4245 

V5:-V5  +  P*X 

4250 

V6=\'6  +  P12 

4255 

GOTO  4  340 

4260 

G[  1 J  1  ]  =  V1-M1T2 -  l  i 

9 

4265 

G[  1?2]=G[2^  1  3  =  V:' 

-11 J  -M?  -N''^ 

4270 

G[2j2]^V2-N2t2/r! 

'■J 

4275 

MRT  C=INV(G.:' 

4230 

VI 1  ]-V4- N1*N3 ■ H9 

4235 
4290 

Y[  2  ]  =  'v'5-N2*f13  ^Hy 

4295 

V6  =  V6-N3t2.- H9 
tiflT  F  =  i:>-Y 

4300 

X2  =  '::  M3-FE  1  ]:U11-F 

i  2  ]Hrl2;.-iT 

4305 

V4=^l  .-  i  4*F[  1  ];■ 

4310 

V5=-2*V4*FC 2 ] 

4315 

Q  =  :^2-V5l2.-4.-V4 

4320 

R2^Vb-F[ 1  ]*Y[  1  ]  ■ 

f  I  21-  r  i:  2  1 

4325 

Wl=SQR<R2/(N9-2 > 

■  ■  0 

4330 

IF  V4*(2-Q::i  O  u 

"iHEN  434i 

4335 

I-3UR(  3.  7-:'iV4*':  Z-  ' 

4340 

RETURN  U 
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C  -  MEAS  (cont) 


4350 

DEF  FHrUQ:' 

4360 

bOTO  Q  OF  4465-4oriS 

4365 

IF  F3=0  THEN  4410 

4370 

DISP  "TEriP(F> " ; 

4375 

i:i  =  FHE3-^FrJH.:;H[  3  ]/i0j 

4330 

fl[  3  1=1  0-1"! 

- 

43S5 

DISP  "REL  HUr-nri  ^^;v■; 

4390 

q=fhi^::h[  5  ].-^-10) 

4395 

HE  5  J=la*Q 

44  U0 

Hl  4  ]=10*':'  (H[  3  ]/10  '  1  0  =  ,-8  !  L.OC-  rit 

5  J  ■  1000  ::■.■■■  0 .  1 

1  1 

•  -t-  i .  2  3  2 

440  J 

GOTO  4425 

4410 

H[  3  j=100O-t'::FHXl  10  i-i-rj--'2y-i-FNR2> 

4415 

fit  4  >10O0*<FHHlCi9  i-f-  MP:,; ) 

4430 

fiC  5  J=1000*E--;P<  e  .  i  •  1  - ..  •■  riL  4  3/18: 

Tu.  7S-(HE  3  ]-• 

10 

;^t0.  73) ) 

4425 

IF  H2#-3  THEN  4460 

4430 

DISP   "CLOUDS(0  TO  ■^r.pn i ij  ,  ■■ ; 

4435 

Q=FNE2  +  FHH(IHT(H[  6  J/]  0h:) 

4440 

H[  6  3=100*0 

4445 

nisp  "WIND  (mph::'"; 

4450 

Q=FHN0 

4455 

hC  6  3=H[ 6  ]+Q 

4460 

RETURN  0 

4465 

FOEHftT  5)'.->  "TEMP                 DEK!  PT. 

REL  mv 

D 

NflTER  DENS 

4470 

NPITE   (15j  4465) '■CLOUn  COVER 

UIND" 

4475 

FORMHT  F9.  1 3  "  F%  F10.  1  -     F'  ^  p- 

]  .  1 !  "         F 1 0 

.  1 

1  "   HiV|/|V,t3'^  ?  2F10.  0j  " 

4430 

Q=  1 00+  C fl[  6  ]•■■"  1 00-1  NT  "  HL  6  3.-'  1 00 

44S5 

L7=256*EXP(e.  lli  +  a-![4]  -  10  MO.  : 

■3  ■  -  5*(hE3  ]■ 

10 

-  3  2 -  Oh-  2  7  I. .  16) 

4490 

NR I TE  <  1 5  J  4475  j  HE  3  ]  .1  u  RL  4  ]  i  l 

- hL  5  J/lSj  L7j 

lu 

i    hL  o  J.-  1 00  J !  Q 

4495 

PRINT 

4503 

RETURN  0 

4505 

DISP   "TEMP/HUMD;  0  =  HUTO^  l=MflHL 

4510 

F3=FNB3+FNNF3 

4515 

RETURN  0 

4520 

DEF  fnu':q;' 

4530 

I=C£ 

4535 

E0=E2 

4540 

P=FNPC3 

4545 

IF  E2#E0  THEN  4535 

4550 

HE  7  ]=5000*Q1 

4555 

4560 

E0=E2 

4565 

IF  C2  THEN  4580 

4570 

02=1 

4575 

OOTO  4590 

4580 

02  =  0 

4535 

E2=E2+5 

4590 

0=FNPC3 

4595 
4600 

02=1 
E2=h0 

4605 

Q='v'9*  <  2*','-','9  >  ■■"■Q 1  *hE  7  ].  1 00a--"  J 

4610 

IF  Q>1   THEN  4620 

4615 

Q=l/0! 

4620 

HE  3  J-10t4*LGT<Q.--  R3  < 

4625 

FORMHT  "  BRG  PUR      Bh:C  f'kH<-\ 

PWR-*a.-'STIr-' 

TD  T'j.tf 

4630 

WRITE   (15,  4625;' "MHHL.  PPON 

OilJ  00 

PL 

TR" 

4635 

FOPNRT  F7  .  4 ,  "  vM  %  Fy .  4  5  "  i-iN " ,  fz- 

. 0; n ]  . 4?  3Fb 

0  ? 

'  dt' '  '  r  0' .  4  !  '  dt' '  )  FOi .  U 

4640 

m  I T  E   a  5  ^  4  635  >  HI  7  1/ 1 00^ ;  J ,  r::0 

r  flO  ?  0  0  J  E6  t  "  d; 

£2?      0  J  "1000?  PI 

4642 

Q- 1000*  J.  HE  7  3 

4645 

IF  E2>0  AND  E2'-li  FiMH  V\  l  HliU 

l.--Q<4  HMD  Mi 

HESDoSOS  THEN  4670 

4650 

D I SP   ■■  HOT  NURMHL 1  -  flD  J  f  • "' : 

4655 
4660 

Q=PNb3+FHN0 

IF  Q--0  THEN  46701 

4665 

0  =  FHr-0  +  FNDl+FN.j6H  Fil  il;.TpN  \:<^\ 

4670 

RETURN  0! 
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C  -  MEAS  (cont) 


4675  DEF  FtlJ'.:;!;'  ■  '  ' 

■^685  GOTO  iJi  L'F   4  ;'Ot::i  ?  0  >  V;.  ■  <  r>: ;.  v.,  1  1  '■; '  76c';:5  ? I  U   -  0  ]  Fi;;  •  7 

4  6  0  G  0  T'  0  0:  ?  i .  i  F   '  i  0 '?  b  ?      0 ;  ;,'„,■.  ^ ,  ,;; ;■  ,.      ; .;, 5,7'  4 1 G ,  4  & ^  f  >  i  ^  ■ ^  - 

4'  6  9  5  G  U  T  0  4  7  '>  0 
4700  R-Ofij. 

4705  niSF   "SUN  THFE  EX  I"?    NEFiO  iHT"? 
4710   0:=FHPJ-  +  FHN1 
4735  F4=y 

4740  niSP   "SET  liNT  DELnT'  i?  Er:KK   FT  ; FHE4 "  SEC  (  i  ^REREFiD  :> 
4745  Q=-FND;::'  +  FriM0  ^ 
4750  IF  Q  THEN  4740 

4755  DISP   "FiIiD  S^J-lv-s  10  i:  L0CI<  FEflli  1  ^^^^YES  > "  5 

4760  Q  =  FNriO 

4765  CFLFlG  5 

4770  IF  iO  =  0  THEN  4785 

4775  SFLFiG  5 

4780  T1=^E4 

4  7  8  5  Q  =  F  H I j  d  +  F  N  y.  6  9  +  F  [\  B  +■  !■  ■  i  ■!  .j  t  t  ■!  J 1 8  - 1 1  \  J  9  f  \-\  M  2 
4790  R=302 

4795  n  I  SP  "  1  SET  3G/T  .  3E 1  RP  .  41     :>  5Ni:,Ri   TRPE  ?  OPSTRT "  ? 
4800  F5^=FNBE-i-FNHi 

4  8  0  5  G  0  T  Oi  F'  b  0  F  6  E  O  5  <  4  :B  j,  5  ^  v;:^  5 ij  -  7  ?  1 0  ?  0 :5  0 

4810  GOTO  4r00 

4815  R-383 

4820  Q^:=FHFH  F  ,  J15 

4822  DISP   "tt  NcflS  PTS"; 

4823  N4=FHNNJ 

4825  R=3e4 

4826  DISP   "tt  PTS   IN  F  i  r ; 
4330  R5^=FFiB4  +  FHNR5 

4 8 3  5   I F  R     2-1  \i  T  k  R  5  /  2     ]'  \  i  t.  \  \  'l  t  '5 

4840  R5-R5+1 

4855   IF  M4-::63  THEN  4375 

4860  BlSP   "ERR: ttPTS>63" ; 

4865  Q  =  FNE:i0  I-FNH20OO 

4870  GOTO  4822 

4875  IF  N4;F'5   JIWIH  4';^0w 

4880  DISP   "ERR:   ttNEflS-;  #F  EI"  5 

4885  O:^M-NB10  +  FiiN20U0 

4890  DISP 

4895  GOTO  4822 
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C  -  MEAS  (cont) 


4  MM 


4?: 
4v ; 

4-:'  ■ : 
49-f  ; 
4945 
4950 
4955 
490.1 
49f  5 
49  ?y 
4975 
49  S0 
49  S  5 
4999 
4995 


:  MT(  CM-l  .•/•b>  +  ; 
.7-i-F4 


E: : 


\  OFi-SE 
■r!iH2  ■ 


l-l+;:f 

000  '!'='■  E;5h  BF.  SIML  j-'-l- 


10  xFNC2+FNMlThNI.S 


50 

30 

50 

5 

50 

40 

50 

45 

50 

50 

50 

5  5 

5  m 

60 

50fa5 

50 

70 

50 

5H 

F  M 

5i-: 

■J  L 

cr  -j 

Fi  Li 

Cj  -j 

05 

cr  -i 

10 

■_'  i 

15 

F  0 

cr  \ 

3  0 

cr  ■( 

-j 

-1  0 

45 

c:  "I 

J0 

cr  -j 

5  5 

cr  ^ 

F0 

b  5 

cr  -I 

?'  0 

cr  ■ 

80 

£-  -. 

90 

C"  1 

Cj  tr 

-J  1 

C|  - 

:00 

:u5 

cr  - 

■  I  <. 

0 

5215 

FuFflFFf       MEFiS        HF^i^!  T 
NRITF   as?  5025'  "FLU     i  Hij  Fi 
FORf'lFT  F  2  .  0  "    St.-     ••''-.-'■<■  :  .  .  ' 
WRITE   a-:   5F35    .      ;  r  ;  F  ..  /i 
FORMfiT      2.;:  :'  '  ^    ^        '  •  i-  ,  ,  j  . 
NRITE   (■  15.  50'i5  'F'"-  iF- 
r!lSP_  "GO   :  t  =  FEW  m2'.  FL   " ! 
1!  =  F  N  b  1  +  F  W  U  3  0  0  +  F  H  B  i  +  f  W  \  \  u  ■  F '  Fi  2 

IF  Q  THEN  4975 
J=FHT2 


.  IF 


FiZIF 
2?  Ft 


JTH 


ELE' 


3F 


um  i:  1 


FLRPSE 


Fi';I  I  E   ■  15  J  5095  )  -'Dil 
FOPNHT  F4.05  2Fy.0-: 
WRITE  ( 15?  5105   ■  J 
V1=M1=0 

r  r'  I  I  I  i 

FF  [NT 

Ii[  7  6?  1      •-:h-lFFF:'  -■ 
rl[  TbH  2.  ;fh.*io0 

IT  16:.  3  ]-N4 
F-21 

IF  E1  ^32  THEN  5l 
Q==E1-  24 

DC  TF,  4  '  •  ir;0::i 
Ii[  1  J  1-  •  I  Fi 
R[  1  ]==NF-'  100  +  116 
F;[  2  ]=10MiLi-  F 

IF  M2)f  2  THEM  5,;: 
U^4-Firn:n  FFDl  hFNUI 
?"\''\\\'X  3 
hC  9         luT  4 
U  =  HL    J   iu  14 
R-21  0 

O^FM'i  0  1-Flil'l 


i  'L  I  N' 


h2  E 
'  -  f  1 1 


HR 

IHS 
.45  "d^ 
. INT( ■ 


IH: 


BIFi:; 


L  I 
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C  -  MEAS  (cont) 


5^20  R-vjii 
5225  H3==N3+1 
5236  T2^Fr.P:: 

5235  IF  FfiP3-T2  533':: 

5240  IF   IN"I !  2  - 0.  02;'-  !  .:  MiFf-  l.,::,.^ 

5245  P-FMPi:3 

5250  I)[  TF'.  H3  +  7  J  =  LOi;;':  I- ■  n  '  -i.i 
5255  Q  =  FN', H3 
5260  R=312 

5265   IF  N3^=^-3  OR  \\0^€   TiiiJi       i  iO 
5270  Q 1  =  f  -i  3  -  S  3  +  R  5  2  +■  0,5 
5275  X^2*';  N3-33) --fF-t 

5235   IF  Ql  ^:  1   OR  Ol  :R5   1  \\£u  5235 

5290  Q==FNGH9 

5295  IF  N3:H4  THEN  522u 

5300  R=313 

5305  P  =  FNG(-99:' 

5310  DC  T6?  3  :i-N4 

5315  Ii[  T6'  6  ]=:LOG'  P  Ll>-1  Ot  4 

5320  Q0  =  H-V5':N4*E5.- 2. 

5325  Ii[  16,  7  ]=  1 00*  ■  S3  r V5-'-i  l4.-2  • 

5330  IF  N2tt0  THEN  5350 

5  3  3  5  f1  [  H  ;3 ,  1  ]  =  I H  T  ( 1 0  *  L.  +-  0 .  5  .- '  1 0 + m  i  0  0 

5340  MCN3.b]-F 

5345  il[H3j4J=I 

5350  Q=l 

5355  PRINT 

5360  FORHhT    "#FIT         RH"r  HPBN  T(" 

53:65  H  P I  T  E     1 5  ;  5  3  6  O  > :. ..  J  J  '  -  ilv'  a  ;  i  u  0  T-  F  '3  E  T         F'  E  fi  1  ■:,  # 

5370  FORMFrr  F  3 .  0  j  F  1  0  ,  3  ^  "       i '  -<  F  J  9  .  4  ?   +-■ "  j  F6  .  2^  " " 
5  3  7  5  i'J  RITE   H.  5  -  5  3  7  0    i  9  ■  [  <  f  •>  i  'J :  ■  -  H 1  n 
5380  F  0  R  r  I  f 'i  T  F- 1 1 .  4  ^  "   dt  :>  '  ■  F  1  0 .,  3  2 
5  3  3  5  W  RITE   C 1 5:  •  5  3  3  O )  Q  y  ,  I)  [  1 '  6 ,  /  I . '  1 
5390  Q-FNS4 

5395  PRINT  THB20  ^  '  i  rii;  HP  BIH3   i\'   F-^ak  before  PEfiK#" 


-EVEL: 


1 

1UH--  p-Ri)  -Ki/  vV-i  ; 


5400  PRINT  1HB20 
5405  G  0  T  0  5  4  9  Fi 
5410  R-314 
5415  Ml=Nl+P 
5420  Vl=Vi+PT2 
5425  R=315 

5430  IF  N3'.N4  THEN  5220 
54  35  Z  =  N1.  N3 
5440  PRINT 
5445  PRINT 

5450  FORhliT  9:^:.  "T(9K'':./  [<: "  .  ' 
5455  NRITE  15-5450)3$ 
5460  Q=  1 00-  SOP  ( V 1  -M  1  42  ■  H  J  ■  ' 
5465  FORMFiT  F16.  4,  F14  .  2^  '  ■ 
5470  W  RITE  <  1 5  J  5  4  6  5  >  2  ,  u  .  0  ' i  \  K 
5475  PRINT 
5430   IF  N2iF 


decrease  [lECL  BIRS   it  1st 


deep 


H3-1 )  ' 

t!3  1  '  ;t 


'MERI- 


. F9. 0H  F 
2*H9 


T"  ?  9;; 


iff-'-.  THEN  54';mj 
5435  B5-2-B6.-SINL 
5490  Q^FNSi:.21-4M  +  65*IN  i  ' 


H-h-3r>..-65 
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C  -  MEAS  (cont) 


5495  R  =  3ii5 

5560  IF  N2<2  TriEH 

55j5  Ql=Nr=y 

5510  FOR   Jl^-:-  TO  6 

55  i  5  Ji '  5  ]  1000 

5525  P  =  LW  E.  TCiC  Jl '  6  J. 

55:30  0  =  FNGli'? 

5^."=;  'i":-:T  11 


5550  y  l^^FNZCMe 

5555  Q-J  =  K-S[  riO' 4  3  2/ 1.  s:-.0""-;"i  ti3 

5560  ri[  rIP.  8  ]  =  04  -  ( 'i- 1  .  -34  £ 

5565  ru  No?  9  ]  =  Q4/Kl/( Y-1 >-3^  B3 

5570  n^cY-i ;a 

55'^5  M[  N8.  2  ]  =  lu*LGTM 

5530  v=^-;v7  +  wi  -  z 

55S5  Ul  N3'  3  ]=  1 0+LGT  ^  V7-7  V  y  n 

5590  r'irHS-7]  =  V5 

5595  R=317 

5600  Q=FHC1+FHH1+FHI5-FHS1 

5605  PPIHT  TflE22?"BEST  FIT  FOR  THE  5  CUVS 
5610  PRINT 
5615  Q=I*E3-N4 -£5*2 
5620  M[N3-5]  =  0 
5625  WRITE   O 5 ^  5360 Sf  i  "  "i  - 
5630  WRITE  ( 15' 537a>N9.  Q^-^'T's  lyP  +  i-JH 
5635  FORMAT  1-10.3-"   de-g"  *  F     45  "K  "'Ft. 
5640  WRITE   ( 15.  5635)  V5j     Hl  NSa  ]^  No?  I 
5645  Q=FHS2 

5650  FORMRT   19X?  "G"  -  17^ ^  'G  T'^lSyr^Nt 
5655  Q=riCN8j3]4-10*LGTH9 
5660  Q2  =  RB5(  ( 1 ) -•-■X 1 -- H ,)   N^ lO-'LOG  1 0 
5665  WRITE   ( 15? 5650>O,  ■   dE " ? Hl H8 ' 2  ] ? ' 
56:^0  3  =  FNS2  +  FNI5 

56  75  PRINT  THP33 ?  "  1 00+ 3:11  n-F I T  j  ^MFi' 
5680  PRINT 

5685  FuRMhT   1 0:  ^  "  GUT  " ,  5F 1  P .  0  s F?4 .  1  = 
5690  RE HIM  YC5] 
5695  FOR  1=2  TO  6 
5700  X  =  D[  I  <  5  ]--■"!  000 
5705  R  =  U-'>EXR(D[  I '  3  ]   :  3  ;  4  ^ 


/EHL  OFFSET  T. 
"6=1'" de g" 5  F4 . 0 : 

■NEF" ?  i5X? "HUF" • 

]? "  +-    ■ Q25 "  dB' 


ELE'' 


RUN  SET" 


I'll  vio 


2i=F5.2?2F12.3?  "  K^^MtS" 
J,"  K'Mt2"?tl[N3?3] 


"^7  1 


i7l5  n33T  I 

'720  W-ITE  U5?56S! 


2?  -1  =  U?  i  5  ii?  'I'L  I  J?  Y[  3  J?        5  Y[  3  ]: 


•[4].  "-f.YCS]? 


5725  Q=FN32 

5730  REDIM  YC 2  I 

5735  PRINT   "TO  RERLfllt  N 

5740  R=31S 

5745  PRINT 

5759  DI3P  "REHRRKS: " 5 

5755  Q--rNB5 

5760  INPUT  N$ 
5762  D^  =  H4[ 1 ?  25  ] 

5764  E4=R4[2e?33] 

5765  PRINT 

5770  ri[  40?  1  ]  =  nC  43?  1  J  hi 


KEY   1  t 


■80  00-r''L4u?  j  ]  +  3-^-F7+33 

^35  FOPNhT   "STORE:    INT  >  ; , r  "  =  F3 

^'?'0  WRITE      15=  5735;' M,  f'Ki,  HL  40.  1  J 

Vi3  fM  0 
00  STORE     LRTH  #5?Uti 


•EXT  FILE"'F3. 


■Eft" 


:.tT7t"  ?  1-3=  H: 
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C  -  MEAS  (cont; 


5^5  R=-319 

5810  IF  H0-^^7  TiftH  5o  . 

SSi^e  IF  F6^=l  THL'N  SSOu 
5825  U^^FMS^+FH  jt4 
5830  GOTO  6035 
5835  P"3r^^? 

5340  FC'Rnrrr  '  Hht  I/s" 

5345  WRITE  (i5.53ie, 
5350  FORHBT  ^F3.0 
5855  Q-fHl'Z 
5360  FOR  I--'l  TO  6 
5365  PRIHf 

5370  FOR  J=l  TO  N4+7 

5375  URITE  ( i5>  53S0^M  i  »  Jl* 

5330  IF  I  NT  (J/ 10) -J/ 10  -{HEH 

5335  PRINT 

5890  HFKT  J 

5395  PRINT 

5900  NEKT  I 

5905  Q-6*<N4+7>/i0+4*MC40»  U/5+FKi2 
59  J  0  Q=-FHS2. 
5915  RETURN  8 
5920  R^-321 

5925  mSP  "LB3T  fCftSC 0-4-10) " J 

51*30  INPUT  Q 

5935  IF  Q  THEN  6055 

5940  GOTO  4815 

5945  R~322 

5950  Q^1+17*F7 

5955  r»l=Qi2 

5960  FORHRT  "EXT  3TDRE;     fi;  %  F3.     3  0X .  "H!  %  F3. 0,  / 

5965  WRITE  < 15» 5560)Q, Qi 

5970  STORE    DfllR  «»5»Q,H 

5975  STORE    IffiTfl  #5,Ql,ij 

5980  RENIHri  #5 

5935  RETURN  0 

5990  R=323 

6005  STORE  4^50,2670 
6010  STORE     rniTH  6^S 
6015  STORE     mifi  GjT 
6020  STORE    mifi  10,  H 
6022  STORE  12,3703 
6025  RENIN)) 
6030  RETURN  O 
6035  R-324 

6040  IF  N7/24  OR  HHCmH/T::  UilM  C^j'yd 
6045  IF  F6"l  T;iEN  47'''0 
6050  GOTO  4305 

6052  PKJNl    'HEH3/3UH  TriPF  FULL" 

6055  Q~FN.J12^FNSlfFN,^^ 

6060  DIGP  "TO  LIST  PRGHs   1  .EHIh  <2 /I. IST  ' ; 

6062  STORf  12,3700 

6065  0:---^'\\lG^V\m 

6070  GOTO  4790 

6075  R==325 

6076  33 ISP  "RIiV  STORE  ',f  ; 
6030  INPUT  Hi 

6035 

6090  NLNS,  1  3"'-NO/l00 
6095  GOTO  5740 
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C  -  MEAS  (cont) 


tlOQ  R-326 

tlyl  DISF  "Tfi<K>"; 

ties  Hy-^FNNHy 

61  It'  GOTO  4900 

6115  R=327 

6116  BISP  "HR  nNG  Blnf^airr;  ■  ■ 
6120  H=FMNH 

6125  BISP  "DECL  &IflS<DLC.- 

6130  L1=FHNL1 

6135  DISP    "flZ  BlHS<DEGr ? 

6140  X5=FNNM5 

6145  BISP  "EL  EIfl3^DEGr'5 

6150  K6=^FNHK6 

6155  GOTO  4900 

6160  R=32S 

6161  BISP  ■■G-  TH(dB;'" ; 
6165  B7=FHNB7 

6170  H9=G.^-i0t<B7-a0> 
6175  GOTO  4900 

6130  R=329 

6131  Br3P  "T--Ta  $  90 
6135  B5=FNHB5 

6190  BISP  "CSC  COEF"; 

6195  B6=FNMB6 

6200  GOTO  4900  • 

6205  R=330 

6210  Q=FNF1+FHF0 

6220  N9=K=0 

6225  BISP  "SKY:GnT<HRS>jSTftRT5ST0P.3TEP"; 
6230  INPUT  I5-H3jJ1 
6235  R=331 

6240  Q=FHD0+FHIil+FHrtUi-FNC5i  FhH  1  r  PH  1 3-Fri32^FHU  1 
6245  Q=FNS2 

6250  PRINT  ThB305"SET  i  ;N':^-r4 
6255  Q=FNS2 

6260  PRINT  "iiZ"<'EL"?'    '  ?  '  GMT "  ?  "  T  T.i " 
6265  PRINT 

6270  FOR  E1=I5  TO  N3  STEP  Ai 

6275  PRINT  FHh  v  H0  ,  L  ? 

6230  BISP  "RERLT'; 

6235  INPUT  fi$ 

6290  E0=E2 

6295  F=FNPC3 

6300  IF  E0-E2  THEN  6230 

6305  PRINT  Tfie45  5El.p 

6310  K=L 

6315  X2=1/SINL 

6320  Q=FNGN9 

6325  NEXT  El 

6330  Q^FNG-:-'??.' 

6;  :5  B6=Y[  1  ].  G[  1 .  1  ] 

6  340  B5-'  fi:-f-  f  *M;  ■ 

6345  Fij"^    '    -  .  .  :;:s"r-Tv       \"      ■       f^:'.,  4.  "/sim  [  ■■ 

6350  I'lKr,  r:      1  V  -  ■: .  ;     R-j?  r,:':. 

6355  Q=FH3<33-2*N9+o5-.  INF ,:  ;';^+2i: 
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C  -  MEAS  (cont) 


6360  R-332  ■  ,  . 

6365  ri[  nSj  1  ]^t^Cl/lyG    '  '  ■  ■  , 

6379  M[HS?2]  =  E:5 
6375  M[NSj3]=B6 
6330  M[HS5  4]=FhT3 
6335  M[N3i5]  =  H[3  3  10 
6390  M[H3  5  6]  =  F 
6395  ri[H3^7]=L7 

6400  M[  h3^  8  ]=INT'  •.N3--Ib'^   J1  +  i  / 
6405  MC  H3i  10  ]^H6  +  M7/l00 
6410  GOTO  5740 
6415  P=333 

6420  FORMhT  /.S:^"BIRIi      COLL       P  PWR  dPodd  %  / ,   RUH/^ET  STfiR  ELEV 

6435  WRITE  (  15. 6420)  "  G  •  r  C^-T,i         riPBN#l  HPBW#2     rREQ     LECL         HEP  HUP" 

6440  PRINT 

6445  FORMHT  F6.  2.  F5.  1  i  F3 .  3 -  2F9 .  3 ^  -H- 7 .  j ,  PS .  3 
6450  1=0 
6455  1=1+1 

6460  IF   I >39  THEN  6525  ■  • 

6465  Q=M[  I J  1  ] 

6470   IF  Q=0  THEM  6455 

6475  QO=M[ 1,6] 

64S0  Q1=M[ 1,7] 

64S5  i:!2  =  M[  1,6] 

£,490  J  =  M[  1,9] 

6495  Q3=RBSQ 

6500  TRflHSFER  T[  1  00  :'ru3-  i  0*  un  ■  1  0  ■  li  5  -  1  ]  TO  3$ 

6505  MR  I  TE   U  5  ,  6445  Ml  I  ,  i  0  ] ,  '      "  ,  Zf  ,  0  ?  MT  1,2],  M[  I  -J  ] ,  h[  I  .  4  ]  <  M[  1.5],  00  -  Q 1  ,  Q2  ,  J 

6510  IF  IMTU.  3)-I -I;  THEN  6520 

6515  PRINT 

6520  GOTO  6455 

6525  RETURN  O 

6530  R=334 

6535  N0=7 

6540  N3=0 

6545  E2==6 

6550  H=L1=0 

6555  3T^"BIRr!" 

6560  MAT  H=ZPR 

6565  MPT  D=ZER 

6570  R=335 

6575  IF  FLRGUO  THEN  6595 

6  5  S  0  n  I S  P    'k  E  3  E  T  t1  E  H  C  ^  1  -  •  V  E  l-  >' 

6535  Q^FNNO 

6590  IF  Q#l   THEM  6635 

6  5 '?  5  F  9  =  F  2  F  5i  0  5  =  E  9  ^  Z  5 = ■  i  ■^  ■ :  i  ■  1 1  i:-  ■  0 

6600  IF  FLfiCl-0  THEM  C^. 

6605  PRINT  TRB15-  'MEMS  RP3ET" 

6610  Q=FNS1+FH.J1  3  +  FHS2 

6630  niSP  "SLMiiT  RhNGL,  LiJ  i     r..'!  ' ; 

6635  E7=FNNE7 

6640  niSP   "RCR  GHIN  SLOPE  -MMs"; 

6645  Pl^FMMPl 

6650  niSP  "hZUjEG;'"; 

6655  H-^=FMMh 

6660  DISP  "EL.aiEG  ;' " ; 

6665  L^PMML 

6670  3 FLAG  1 

6675  E4=l 

6630  iJ  =  FNJ13 
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C  -  MEAS  (cont) 


66S5 

R=336 

H3=0 

6695 

Q  =  FHF0  +  Fr-IM0 

6700 

q=fh;;63+fhx6^ 

6705 

L$="COIiE:  0=3KVj  l=-F?  2=k 

CR  1? 

f-  3 

J 4=0TH 

Ek  '" 

6710 

rasp  L$; 

6715 

E 1  =FHHB  1  -f  FNJ9  +  Fri-J  i  5TFr-IJ3 

6720 

T=(B5+B6*(1/SINL -1 ' j^H? 

6725 

LISP  ■■#  HEflS  PT3'  ; 

6730 

H4=FNB2+FKHN4 

6735 

IF  H4<73  THEN  6^65 

6740 

DISP  ■•ERROR'.  #MtHS<73-'; 

6745 

Q=FHB7  +  FNL42000 

6750 

PRINT 

6755 

IjOTO  6725 

6760 

6765 

Q  =  F  H  C  3  +  F  r  U'1 1  +  F  H 1 3  -i-  F  K  S  3  -i-  F  si 

Dti-4-Fi 

nDI  +  F 

NU 1 

i-FNS2- 

-FHKl 

6770 

PRINT  ThB20<L* 

6775 

Q=FHS2 

67S0 

FORHhT   "       SLANT  RRNGt 

RZIMU 

TH 

ELEV 

6735 

NRITE  < 15 1 6730)'    rnDE  R 

•  ir-i  : 

■SEJ " 

6790 

FORMAT  El 2.  3?  "Kri"  ^  F12.  2' 

fro  _  :- 

<  Fll . 

4.F 

7.1?" 

MZ"  5 

6795 

WRITE  (15; 6790>E7*lE+y6' 

R?  L'  i 

r  .  W?  B 

i!N 

6?  N7 

6300 

ni  =  n  2 = N  3  =  N  :3  =  V 1  =  V  2 = V  3  =  0 

6305 

Q-FNS3 

6310 

FuRMhT   "   FILTER*  HOIS 

E  EW 

1  ■£■  t 

CONS"! 

6315 

WRITE  ( 15- 6310) "GHl N  SLO 

FE 

EQ 

IV 

EW" 

6320 

Q=15-^lHT(Fil-■■■2-0.  5  ■ 

6325 

Q0=  1  +5*  H 1  .-  ^^ I HT  H 1  -'2 ) ) 

6330 

W=Nr  Q,  QO  ]*(  1+Pl-HEQ,  M 

J  +  P 1 

Q  5  Q 

6335 

FORMhT  F5.  01.  F12.  3-  ■'  MHz' 

5  F10 

MHz 

"  5  Fi&, 

.  4'  Fl 

6340 

WRITE  •a5j6835>fll5NLQjL!0 

i  Hl 

h  ,  \-'  y  + 

1  Jj 

NC  Q? 

6845 

Q  =  FHS3 

6350 

FORNhT   "       Ho  P/P(F 

i  ^1  II  ' 

PW 

R#l 

6355 

WRITE   < 15^ 6350) "PROG 

TIME 

(HRS) 

6360 

Q=FND1+FNS1 

6365 
6370 

H3=N3+i 

6375 

E1=FHT1 

6330 

I=FNX100+FNX24+FHR2 

6335 

R5=E2 

6390 

P=FHFC3 

6395 

IF  R5-E2  THEN  6335 

6  9  0  0 

D[  1 '  N3  +  2  ]=LGT':.5*Q1  ;i*-ii+t 

14 

6  9  0  5 

Ii[  2j  N3  +  2  ]  =  LGT'::5*Q3  >*1E  +  K 

14 

6910 

IF  P>0  THEN  6920 

6915 

P^l 

6920 

ri[  3.  H3  +  2  ]  =  LGTP*lE  +  y4 

6925 

Q  =  E1 

6930 

IF  El<:32  THEN  6940 

6935 

Q=El-24 

6940 

D[  4- N3  +  2  ]  =  Q*lE  +  03 

6945 

DC  6j  H3  +  2  ]^E2+E6 

6950 

FORMAT  F5.05F13,5?2^13,; 

:  ?  F6 . 

0  J  "  C 

F6.0? 

"  dB" 

6955 

IF  QO^O  THEN  6965 

6960 

DC  55  M3  +  2  ]  =  Li:T<:fit:3C'!3 'r^lP' 

6965 

Ql=5*Ql*10t':;  (E2  +  E6).  10) 

6970 

U3=5*Q3^:10t ( '  E2-1-E6)  ■  ly ) 

6975 

WRITE  (15?  6950)hl3.     Ul  - 1 

E£ 

'  5  E  ?  t  i 

6930 

IF  N3--3-INT(N3/3)   THEN  ^ 

i  '-^  'J  0 

6935 

PRINT 

RCR  F  ENDWD 
F3 , 0 »  2F5  =  0 

2nd  CONST 


.  .4?F9=3?  •■  HHz" 
■   MHzt2  ■  3  Pi  5 'VnHz' 

PWR#2  MfiHbRL 
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C  -  MEAS  (cont) 


6995  Ml  =  nl'^P 
7000  f'1£--M:V  +  Q  1 
7005  n9-n2'M:  Q3-Q1  > 
7010  Vl='.'t  +Pl  2  ' 
7015  V2  =  'v'l  +  Qlt2 
7020  '  /  3  -  V  3  -i-  ( Q  3  ■  -  Q 1  '  ■T'  2 
7025  R=340 

7030  IF-   H30I4  THEN  6365 
7035  Z=Hi/M3+FNS5 
7040  FORNhT  "  #PT9  "■ ,  1  iy.<  >  '  P/P  •  R 
7  0  4  5  W  F:  I  T  E     i  5  ?  f ■'  0  4'  U )  "       i;;  (  m J  [■',  ' 

7050  FORMhT  F3  .  0  5  F  1 3  .  5  "    i     "  " 

7055  Q 1  =  1 0  'Zi  -'-  S  Q  R  ( '■/ 1  -  M  1  i , i  i '  ■ 
7  0  b  0  Q  2  =  1 0  0  *  S  Q  R  ( ( \ '  2  ■-  M ; :. .:  i  \  '  <  ■■' 
7065  Q  "  1 0  i  J  +  S I  -  I  F'  ( V  '3  -  I  I  : ,  ■ '  '  ■  1 3:  •  ■  ' 
7070  WRITE  15i  7050 'irMli  1i3'^ 
7075  F  H  S 2  5  -  4.  *  l-  i  4^ . '  3  i  6  5  + 1  \  i  r  ' 
7030  P=341 

7085  G 0 T 0  El   OF  71 3 0  7 1 2 0 ?  7  1 

7090  F9  =  M1  -[13 

7095  GOTO  7145 

7100  F2  =  H1--N3 

7105  F5-M2  -N3 

7110  Q5==n3-  N3 

7115  GOTO  7145 

7120  E9=M2/H3 

7125  GOTO  7145 

7130  Z5=N1/H3 

7135  F3=M2.-H3 

7140  Q6=^N3.-^N5 

7145  H[  1  ]^=10O*N6+H7 

7150  H[2]  =  F*10O0 

7155  H[ r]=El 

7160  H[  9  3=^^0 

7165  H[  10  ]=^LG  :E7*  1000 

7170  L[ 1 , 1  ]-vfl-180>*l0y 

7175  D[ 2^ 1  ]  =  C2 

7180  EL  3  5  1  ]==N4 

7185  Ii[  4?  1  ]  =  LGT(Ni/N3>  rlE-i-04 
7190  n  [  5i  J  1  ]  -  L  G  T' ll  2  ■■■  W  3:  *  i  E + O  o 
7195  IF  f13:.-0  THEN  7205 
7200  [13=^4 -1 3 

7205  Ii[  6'  1  3  =  LGTai3- H3j  :^  1E  +  U3 

7210  D[  1 1  2  ]  =  L-rlOO 

7215  ri[2j2  3=E€. 

7220  D[ 3j  2  ]-W*10 

7225  Ii[  5)  2  ]==Pl-:-lE  +  04 

7230  hi  m,  1  :i^=Bl+0.  07 

72  35  M[N3,6]-F 

7240  Eo^':  F5+F3  .^-■2 

7245  Q7= Q5  +  Q6 )  ■■■2 

7250  IF  F5  HUH  F8  THLH  7265 

7255  B8=F5+F8 

7260  Q7-Q5+Q6 

7265  n[Hy<4;i  =  E9 

7270  ij   ( F  2  +  Z  5 )  y'  2 

7275  IF  F2_HNli  Z5  THEN  ,'235 

7280  Q^F2-i-Z5 

72':'y  Ml  H3,  3  ] ^^412/ IP::  - 
7295  ML  N3-1  J-H  J-'H  :; 
7300  Mi  M3  '  o  ] 
730S  Ml  l  |::^  'i^  J  ^■.' 
73U1  M[  No  J  10  1-N6  +  I  I,- /  llM 


T-NP#1  (r.M 


10.^  J, "  i:FUR#2-PNi 


1  .,  I  :■  1 


P5.  1 


Q2?  M3-- N3j  Q; 


Bl 
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C  -  MEAS  (cont) 


7315  E-1 

7  3 1  a  I- 1  =  ( 4  E  ■+■  n  7^  -T  p  I  t  L  7  r   ,  \ 

732H  IF  B3^=e  ijF;  E':^-U   fMi  l!  : 

7330  E=(t3-E3'  i:'?-!.".' 

7335  N[ N3' 5  ]-lu-L 31 '  : 

73 4  0  M[  N3i  7  ]=:=ly:'-LGT'J:  u:-H3. 

7345  F'  =  343 

7350  Q ^ F r J C: 8  +  F t i M 1  -r F' 1 1 1  5 i-  r  | •;;  1 

7355  FORMHT  F^.  3-  "  ■  Kl:'    ;  . 

7360  URITE   (  15h  7355  j  Jl !  t: 

7365  Q=FH3£ 

7370  FORMriT   "sPRCb.  LOpP 


h  ■  J  1  ■  ■■ 


5-K9"  :i  F«/3^  "dP(add) "  1  Fi£.  3h  '*!UT6:  3P"  -  r9.  3j  "  :  3U' 


RUN  bET" 


OHT  3H 


7330  FURMHT  F7.2j"  dB  ■  .  3f-' 1  u .,  4  j  F  1  ft .  3 ^  "  dEW ?  F  1  i .  2 ?  "  dB 
73S5  Q=0 

7390  if'  F9  =  3  then  7409 
7395  Q=M[NS,3].  F9 

7400  N R  IT' E     1 5  7 3 3 8 )  1 0 L G T F 1  ■<  f  9 ?  tl [  H 8 -  3  ]  j  Q -  1 0 * L G T E ?  i' ■  C  N 
7405  Q  =  Fh32  +  FtiI5 
7410  GuTu  5740 
7415  R=343 

7429  DISP  TREQCNHZ)"; 
7425  S=FHB2+FNH(F*100U/ 

7430  IF  Q/ 1000=4-   THEN  ,'515 
7435  F=Q/1000 

7445  Cl=2.  997925E+oSt2/':S*P1 
7450  DO"© «  9/Ft  2 
7455  G  =  B2-  a'-F.-  0.  313  -  T3 
7460  B  9  =  2  +  C  I"-- 1  .  3 :3  3  5  4 1  2  }■  G 
7465  B-4l34/ri  r 
7470  F0P   1=1   TO  Mi 
7475  Q2=a-T[  I  ?  1 6  ]/ 1  E+  ^  -i-     ■  i 
74S0  'I5  =  SC  I  ^  1  ]  +  T[  I  ?  3  ]  ■  i  niio  -'; 


c  i  p:.  r- 
0 


■Ta 


N6  J  N 


o054t-23'^  ( F*  1  0t9  >  til ) 


'T  1 iS].'^ 
;    1  ] 
Ji'rlOO::^ 


■[  I;  15]. 


7  4  9  0  N  3  =  F  +  (.  ( H ;  0 )  -  R  <  i  j ;-  •  ■ 
7495  Q-(  1-T[  I   16  ]/lE-i  0  ^  ■  t 
7590  T[  I J  1 0  ]=  ^  Q~Q2 .■■■R2 *  1 000 
7505  Sl  I  :>  4  J=Q2 
7510  NEXT  I 
75  15  PRTURH  0 

7520  P-344 

7521  DISP  "NOISE  HriD  :  0^4M.  i:tf2 1  =#  1  ?  2=#: 
7525  r3=FHNC3 

7530  RETURN  0 

7535  P=345 

7536  BISP  "INSERT  5DB  NHEN  ['.NDIi'"; 
7540  C2  =  FNNi32 

754  5  RETURN  U 
7550  R-346 

7555  I' ISP  "STORE  PRGM       SUN  iJ; Pi  R  :  1  ^- YE 
7560  U=^FNN1 
7565  IF  Q-o  IHEN  7575. 
7570  R  -FN-Jll 
751^5  1U3P  'NEll  ThPE 
75oO  O-FHIIO 
7590  N==N7-0 


>*S[ I ) 1  ]*(F/TL 
1  )-(F/T[ I J IS ] 
*I5^ (N3/TC  Ij  13 


I  5  1 3 

1 0  0  ■ 


*i0y)t':' 
1>)*TC  I 


I.6].--lu0h 
■  ]>'1O09 


o-rri  fri  ■  l-=rgtm 


76o2  IF  ( 

7 60 5  GOrO  4,':;-:, 

76)0  MRT  iv-  EEl: 

7615  ri=0 

76,.o  GOTO  ':790 


Ihlf-N  ,^:.10 
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C  -  MEAS  (cont) 


R-347 

7630  DISP  "FLTR:  1 -SifiyiJ 
7635  fll=FHHfll 

7649  I'lSr'  'HRML  HTH(dB'"5 
7645  EC=FHNE6 

7650  RETURN  U 

7655  R=34o 

7656  DISP  "STRRtt"; 
7660  H0  =  FHh'Hu 
7665  El-U 

7670  TRFlNSFEP  TLNQilJ  TO 

7675  FuRMfiT   "HZ-"  <  F7.  2.  " 

7 6 S 0  E1  =  FNT0+ 3  3 6 h M 

7635  WRITE  (1 5  ^  7675  )  FN!i|-|i- 

7630  DISP   "FlZ="fl"     EL  =  "L. 

7695  UhIT  3000 

7700  PRINT 

7 , '  0  5  I J  u  T  U  7  6  S  0 

7710  R=349 

7715  DISP   "RWRK   TP   IN  PL.f 

7730  Q=FNB3+FNN1 

7735  LINK       10-5*F7)  ?  13-i"^ 

7730  R-350 

7735  NFiT  R=ZER 

7740  NhT  L-ZER[6'75] 

7743  TRhNSFER  TC  NO^ 1  I  fO 

7745  Q^^N0 

7745  DISP  "SOURCE: " ; it- 
7750  rl0^FNB3+Fi-INf^0 
7755  IF  Q#N0  THEN  7743 
7760  RETURN  0 
7765  R^351 
7770  N7=H7+1 

7775  DISP  S$;  " :     SET*r'  i. 
7730  N7=^FNNH7 
7  7  S  5  N  -  6  N  7 
7790  N3=^N7  +  F4 


i  id  7'  y  ,  '3     V  &  7  0  ?  4     5i  I?  7  0  ' 


BIRS:  hR'  LLC?  RZ:^  Ll 
if. ,  "   "  s.f  , 


?  5F 


;00  RETURN  0 
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C  -  MEAS  (cont) 


R  ] 


H 

Hi 
fl2 
h3 
B 

E0 
El 

B2 
B3 
E4 
E5 

E6 

E7 
BS 
E9 

ce 

CI 
C2 
C3 
l;4 
C5 
Ct 
C7 

Co 

C9 


5945 
6415 
7520 


7495 


4i'yy  4,--"^Li 

5260  530iJ 

5990  6035 

6530  6570 


^010     5065  5180 


49  yy 

7fi9M 


1 
1 
1 
1 
1 
1 

71; 


'230 


5569 
5000 


;^07b  ign 
'62:5  7b5.'i 


ii-j4y 


4H 

6160  6189 


i'  1 " 


5210 
5929 
6360 
74  1  5 


7^190  7490 


462y  4t.49 


:,y4y  ^4fcj 


0iO 


35    jijay  59 


618^ 


0  bo70  b7i:0 
5     6340  6350 


6165     6165  6170 

5005  5560  5565  7469 
74?5  7495 


■44' 


4530  456? 
4540  45-^^1 


7460 

45?0  45 


4595     4t.49     71, '5 
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C  -  MEAS  (cont) 


JJ 

By 
ni 
l>2 
ri3 
ri4 
ri5 
Iiy 
L9 
E 

Eo 
El 

E2 


7455  ?4i;~5 
7450      .;  . 


7 J  lb  ■■■jxy 

4535  4545 

4  1  b  5  5>  i-J  '4 1 1     5  b  3 

69  3  a  6':f..j'5  697 

4535  4545  456 


4165 


6     46130     6390  6; 

:;.145  5150  5 
I-''  6  6; 


a  ^,  .:|,  y 
6  -1 7  '1 


4645 


I:;.  Z  9  0 


4- 1  6 


:.040 


1 


4 
F5 
F6 
F7 

Fa 
F9 


3740     4640  69.: 


5175 


5      PI  c;,.;; 


6-0  i  l  '  oJ'-'M 


7490 

6595  7iyy  ,'378 

4  365  4510  4';iiU 

''■595  71u5  7340 

5780  "v:;-i^:;0  ?.'3':; 


6965  69i-'0 
7330  7330 

,-7  or:,  TMRn 


0  0 


.30 

IU5  •■■!70 


■645 


4  35 
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C  -  MEAS  (cont) 


1:4 
G5 


H 

HI 
H5 
H9 

I 


■Li      i::  1  ,.,;:U      b  .by 


15 
J 

Jl 
K 

Kl 

K£ 

K3 

K4 

k5 

Kb 

K7 

KS 

K9 

L0 

L  1 

L4 

L5 

Lb 

L7 

LS 

L'? 

M 


.05     61 70  fcV'20 


,-34y 


3910 


>450  fa45;i  b45'-::i 

>  5  0  5  1 5  0  5  1-  5  u  5 

'475  74S0  74Sti 

'500  ■  505  ?'  5 1 0 


4555     46  05 
8  9  0     5  S  S  0     5  S  ■? 


;i0 


5110     51  £.5 


■'40 

-■  0 


5710 
::480 


o  b  0 
490 


■t,:;,  ■.II;.! 


L  1  gj 

57 1: 
',  4  w  i 
4'  7  ■ 


45.::i0  4:j95 

i.;;;  L::; g  |;^| 

£505  6505 

4  I '  'j  /  4 1'  '-1 

7495  7495 


4435  4490 


b,;.;30      ■  b4  r-'0  b400 


55.-  0 
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C  -  MEAS  (cont) 


Ml 

4 

54  ;;5 
7 1  b  y 

4  2  0  ki 
5460 
7130 

42  i.M 

1-,  ;;;  -i-M 

7135 

-!  ,3  ! 

N2 

4 

4  200 

4  2  ]  ' 

7060 

7060 

7'07h 

7105 

7  i  3i 

N3 

4 

4200 

4220 

-1 2  0 

4.:30 

7005 

7  0  6  5 

''065 

70  .■  0 

7 1  1  0 

H 

4 

7530 

3750 
7735 

431  ti 

HO 

4 

53  1  0 
7  7  5  0 

33 '-'5 
6090 
7  7  5  0 

-:33  n 
,3 

f  3  r:  5 

•""=  0  Cj  '^'1 

f-; 

Ml 

4 

7470 

ti2 

4 

5265 

3870 
5330 

3i920 

3  '3  T '  '~< 
5  5  0  0 

4  4  2-j 

H3 

4 

3810 

3820 

4000 

4  0  0  0 

4905 

5i  c-  5  0 

5460 

5470 

5470 

C  2'"'i : 

6900 

6905 

6920 

6940 

ii  9  4  5 

7055 

7055 

7  0  ':i 

7060 

rOi--0 

7  0  7  0 

7070 

7  0  9  0 

7 1  Oti 

7 105 

7190 

7200 

i"  2  0 -J 

H4 

4 

4100 

4  J  65 

4  c-  3: 3 

5310 

5320 

V.'     i:rl  'i  J 

5430 

5  -i-  1 1 

6735 

7030 

1    U  i  -J 

?■  0  7  5 

7 130 

N5 

4 

Hb 

4 

7600 

4  9  4  0 

5040 

5170 

5  6  -1 0 

H7 

4 

6  0  3  5 
7730 

■~     cr  -J 

1  -J  tj 
6250 
7  7  c'  ^1 

4930 
6  4  i'J  5 
7790 

„i  9  J  :■■ , 
t.=  i"  J 

4940 

N  3 

4 

5^:20 

4  9  3  5 
5640 

■  "1 6  J ' 'i 

: ,;   ,  inv 
i-:,.-,;:  t.- 

5340 

6335 
7300 

6  3  9  0 

7  3  0  5 

639'j 
7310 

r.-lOh 
1  ■    ..I-  -  ■ 

6  ■  1 0  i 

7  3  ■■  0 

Ny 

4325 
6355 

4 0  0 
4  9  f)  5 

I  "  i  "j  i  ■ 

U 1 ' 

i  .  _  ■- 

42i37 
550': 

F 

3990 

3  3  '■) ' 

5  2  0  0 

5  2  4  5 

5,;;:5u 

'  J  3  0  3 

cr  cr 

571 0 

6295 

r.  '  -i  ^ 

PI 

c: 

6645 

6  6  4  5 

C  0  "3  0 

6331 

Q 

cr 

3780 

3: 7  9  0 

33:00 

3:34': 

4135 

4140 

'1 1 4  0 

4  1  ' 

4  1  i 

4175 

4 190 

4i95 

4  5 

4  33" 

4330 

4  390 

4  ":95 

44  ;5 

4  44 V 

4605 
4^-70 

4610 

4675 

4ir.l5 
4635 

46  i  5 
4  6''i  i 

46.1  L 
4  3  1  i- 

4:  ;65 

5215 

5290 

5  3  5  0 

5  3:  J  i 

3  40 


20 

r-"0 


i  ki  M  :j 
1^270 
:  -I  00 
3360 
'  0  6  0 
110 


490 


945 
3310 


4  2  3  0  4 


'1  -4"1 


0 1  ■  1 J 


5415 
1 '  ►  1 3  y 


4  300 
7  3'  0  3 


4325     43  30 


7  0 

30 


yiiy    I  :jyo 


feyuy 


khi  y  bOO: 


^  5  5  y 
^742 


345     4350     4955     4960     5040  513''- 


J     r-  4  05         i . 


4  0 

y  0 


.  4y95 

I  c'  ':^  1  0 

:i  6840 

:i  3  '3  9  0 

1  43  40 

1  4/30 

1  4  450 

;i  4  642 

j  1 1  4  5 

'j  3i,'60 

j  54  60 


6 1 1, 


40 


"  4  y    L  t 


b  :' r:y 

7065 
7130 
7495 


5140 


-J  1  ,■  0 

■/     O  Li 


5b40 
7770 


r  1 1 J  7403 

' 0  423y 
30  6220 


424  0 
6  31 2  0 

4070 
4 1 .33 
434  0 
4430 
4  64  3 

••!7>;  j 

3  13.. 
5470 


4  3;  4  5 


4075 
■4  1  f  '5 
4  : 0 
4-1 90 


40:: 


0  .'i' 
'  d  7  0 
■■'  1  40 


3145     7310     74  00 


z:  -:■  ~:-  a- 


3  : 30 


4075; 
4  1  VT 

■1  :::':3: 

4  ';.i3i 

4bbi-: 
4 


4'  1  0  0 
5460 


y  b::-:y 


e  0  4  y 
7  7  8  0 


"■: : 0 


,1V  MM  L],.-;Hy 


454  0 
7010 


4120 


I  4 
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C  -  MEAS  (cont) 


5615 

5620 

5630 

5645 

5655 

5665 

5670 

5790 

5795 

5315 

5 '-MO 

5'^  iO 

5970 

6055 

6065 

b..:'.  I  IJ 

,  0 

':;,.:45 

6470 

6495 

6505 

i-'5':'  5 

■:■'::'■<■} 

-olO 

6  6 :  J  0 

b  6  "1 

1",'  f '  t'l 

'■■  [■'''■' 

r-.'6'j 

6775 

6  3  y  5 

3  3  0 

■?  4  0 

6  3    f  1 

6  I  6  0 

6925 

6935 

6940 

701 

7U  .'h 

.  ■  U  7  5 

727'0 

, "  3  Kl  0 

• ' "  ' 'i  i  1 

7395 

7400 

,'4-U- 

1  -1 ,_. ':,  1 

7^3  0 

7435 

7495 

?'  5  0  0 

5    1  j 

?'  5  6  5 

7"  ^  7" 

7  5  K  0 

1^-]  [."i 

■"■"7  J 

6  8  3  0 

5320 
6340 

6040 

f,  1 ;  '■]  u 

5790 

5 1-:  0  0 

r;    6  0 

6475 

6505 

6325 

6330 

6330 

4550 

4605 

;  ■■     .  ■  •  .  . 

S  C:  i:r  ir 

I-'  Q  i.r 

5  9  .  ■'  5 

f.dO\A 

6  5  y  5 

6900 

6  9  fa  5 

f,       1-,  1 

69  •■■5 

f'"  t-i  0  0 

7005 

7015 

?^     ■  £  0 

7  0  5  5 

7070 

tr 

-J 

4025 

5660' 

5665 

b  4  3  0 

6505 

7060 

7070 

■  i"'    1"'  "i;;^ 

7500 

7500 

7505 

cr 

6495 

6500 

i:^0 

3970 

6970 

t:T  'Ij  7"  ^; 

~ ;~:  c; 

7020 

cr 

cr  cr  cr  cr 
■J -J  -J -J 

5  5  6  0 

5  5  6  5 

6595 

7  1 1 0 

7245 

7260 

CJ 

6  591^ 

i   ,L  H 

'7  b  H-i 

CJ 

7245 

'■'  2b  0 

7'  3  0  !^ 

7330 

cr 

3360 

'.  "!  r'-  f'i 

3395 

3395 

3  9  3  0 

3930 

3  9  9  31 

5335 

cr 

4320 

4325 

"cr 

3745 

4000 

4330 

4330 

4  335 

4935 

4340 

4340 

4375 

5270 

^  ■"' '-'  ~^ 

6  8  3  5 

boy  5 

ET 

4935 

5 1 1 0 

5110 

7330 

7  -60 

cr 

4900 

4000 

5030 

5035 

5085 

5090 

5090 

5113 

5270 

D  2  r*  5 

cr 

•-.  i-i  cr  cr 
O  O  -J  J 

3360 

3395 

6720 

5 

4150 

4165 

4170 

4730 

cr 

._! 

5230 

5  2  3  5 

5240  . 

5240 

5 

4950 

5130 

5  i  3  5 

5140 

5160 

5165 

5250 

5310 

5315 

5325 

-J  ■„"■  O  _i 

cr 

cr 
.J 

■-.  -?  cr  cr 
.-'  i  -J  J 

5205 

5250 

~i  3  i  5 

5705 

.J 

5 

40b0 

4065 

4605 

cr 

4200 

4  260 

]  1 5 

5420 

5420 

5  4  6  0 

b  3  0  0 

70  It 

701 U 

n  cr  — 

I  U 

.J 

4200 

b300 

7  0 1 5 

7  0 1  '5 

5 

6 
6 

4200 
4200 
4200 

4240 

■■u:4  0 

6800 
4  3  0  5 
4  3  3  0 

4..-;  15 

7  0  2  0 

4335 

57 IL 
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C  -  MEAS  (cont) 


I  1-,  h 


4206  425:;-i     42 -h'' 

554iJ  5'j4'i 

4&bG  40Si::i 

46b  5  4'j:jo  4'::So 

6  7  ':i  iS  8  3  6     t ' -1  'J 


b  4215 
fa  4  2  6  6316 

b  '1  P. '-:  f  i 


4410  4  225 
3736     4  920 


,  1  [  Q 

:  1 1  e 


y6  4: 


4 1  6  5 


5766  5716 


■t6  42  66  43 
s6  6146  76 
56     6156  76 


15 


5  6 1^! 


:  r--       c:"  i:;:; 


7570 


21 

FHH 
FN  13 

PNC 
FHH 


6  4  3  3  6! 

5640  5716 


4990  6 


4S65  433 

7726  775 

7  501 

7  466 


ti     6  2  4'  (:;! 


'0     5476  54S' 


-I  c;        CI;"  c  i 


f  ■  430 


4  3 -"3  4  ■125  4516  4655 
4915     4970     5060  5666 


45 


4i-16  4745  4735  4306  4336 
5755     6665     6730     6745  7425 


'  0     5  1 9  0     521 5     6  2  4  6     6  2  4  6     S  7  C  2i     6  7  6  5 


FNF 
FHF 
FNG 
FN  I 
FtLJ 

FNK 
FNL 
FUM 


'  91 6     4-  3  2  0     6  2. 1  iJ     6  2  I.  ii     6  6  9  5 


4175 
5015 


4;'  5540 
I      b 6  5    C  2  -t  1 


6655  6655  6r.  iu  t.i:.:.30  6,"!  5  b715  67  15 
i' 

7'  4 3 5 1.1     4 7 ""i     5 6  .1 5     5 6 1  -j     '2 l-  6 6     6 2 4  61 


232 


C  -  MEAS 


(cont) 


FHN 

FHP 
FHQ 

FHR 
FHS 

FHT 
FHU 
FHN 
FHX 
FHY 
FNZ 
H[  ] 


BE  ] 
CC  ] 
DC  ] 

FC  3 
G[  ] 
MC  ] 


437 


NC  ] 
S[  ] 
T[  ] 


5976 


coy 
7395 


4830  49 15  4V'7':-;: 

6135  6195  b5'J  ;  cr 

7540  7560  ;"5  JiJ  "'-Ot 

4540  4590  5195  524^ 


'•145kI  4510 

;. '  ■  1. 1     f.;  i-i  h 


4135 


.1     -t  -^  I 


10     4415     4740  4980 


9  i  Id  .1: 
6ftf! 


4125  4985 

4520  4665 

4865  4385 

4410  4410 

3810  5215 

3330  5550 


4420  4420  4420 

4490  4490  4490 

5170  5175  5200 

1   i  O-J 


3710 


55 1 5 
h96fi 


513  = 
57'0f 
717^ 


.■•225  ,'740 
9  3710 
9  3710 


3715  4940  5335 
5640  5655  5665 
6040     6090  6365 


'485 


■'400 
5975 


601  = 
749  = 


7400  7610 
6020  6830 
5555  60:0 


b  ^1  U  U 
'■'  4  4  S 


'4?' 5 


5  ti  6  y 

6  2  4  0 
67;  6fl 


bo  45 

5075  6380 

5190  6240 

5060  6745 

4  4 1  -J  4 1''  o  5 


4435  4440 
4490 
5  2  0  :j 


6245 
7'  fi  7;  5 


r-;       O  ._[ 


r550  4byj 
;3h5  65611 


.80  7185 
?00  4305 

:;4  0  5345 


by 

5230 

5490 
6255 
7075 

7680 


bf'HM  bi'LU-l 


4400 


5140     5160  5165 


7190 


55by 
5770 


■  yy 


■  4  i"  J 

"507i  7670 


4710 
6120 


b  y  □  3 


b  O  O  1 


55  4488 
>g  4640 


69yy 


4310  43; 


b>;r5      6380  63b5 


y      booH      bo4y  hl-;4i.-1 


'505 
'480 


y  lyy 
6715 


4760 
6  1  4  0 
t7  7  7 1 1 


564^ 
66 1 8 
7365 


66  lU 
7405 


44yy 
4640 


>::-'i.-i 


'4o' 


4485 
7160 


;i0  5315 
:i0 


4808 
6150 
7425 
7789 


4415 
4485 
4645 
7165 


6920  b94y 


5585  5590 

5790  5905 

98     6395  6400 

■  j  ET         .  -  cr     cz  .-"  -~  r_  !=■ 


.  0 


by4n    f buy 


7340 


'485 


X[  ] 


yy 


3710  4230 
5720  5720 


2y 
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C  -  MEAS  (cont) 


B$ 
L 

Il$ 

E$ 


7t95  7  742  7  7^' 
4  d  1  U     4  6  2  LI     4  ij  r ' 


4995 


^^4 


4  9  9  '"5 
fa  7  2  0 


boUU      b~'H5      bjDo      l  ib  I'y 


4  6  40^5  40-:;0  4^jb5  4075  4080 
64     bO'iO  b2S-:. 


b : i  0      63  I  5  bbb5 


6705     6710     b  7  ?'  0 
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8.6     D  -  RE7vJ0P-K 
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D  -  REWORK  (cont) 


i  f  Hi  ;:J, !.  6  J     ii  U, 


50  [       t; s.  1  n .  4  N    R e; h  i: k i-:    ,  j  i  - f  i  f-  ■   i ■  .4  -  f  1  ? 
52  \]fij        Rl  40, 10  j 

60  EG  ^'i' 1.9 

62  F5=r9-1  .       ■  ■ 

63  M[  3  ]  ^  3  j:-u  .  i  36 

64  F=^7.5 
6  5  ij  F 1 1 J  2 
66  G  0  T  0  1  3  3'  5 
20u  DLF  FUOj.  i  j^a-i!"  21 
275  IiFF  FIIE(Q) 
236  FOR   I"  1   TO  Q 
2S5  EEEP 

290  WFlIT  3ESn0u*(  1-4  V:i 
295  NEXT  I 
308  RETURN  0 
305  DEF  FHH(0> 
310  niSR   "  (   ==HC)  :  " !  0° 
515  INPUT 

320  IF  B$='"    '   THEN  3::';0 
325  RETURN  VfiLCBJi 
330  RETURN  Q 
535  DEF  FNKQ) 

340     H  j      "  --     -   =-  =  -     #  #  %     \'i  I ?  Ul ' ' 

545  HJ^^ntl  4*Q-S)  4  +  Q  ] 

550  R  +  [5]  =  Fl$ 

555  H*[9]  =  H$ 

360  FOR NAT  F5. 1 

3  6  5  I'  l  R  I  J  E   ( 1  5  H  ■;;  6  0  )  R  $  Fi  ?  Fi  1 1  \  i  i  R  $ 
570  RETURN  0 
575  DEF  FNK(Ha;' 

5 :3  5  L  7  =  2  5  6  ^  E  :  P  ( 0 .  1 1  i  -r:  ( fi  i  i  j  j  /  [  m   i ^  ti .  / 

5  90  Q  -  ■:  0 .  9  2 1. 1   '■■  1  f  !j .  2  1 2  /•  F  T  2  r  5 .  1 0 '/ 

4  0  a  G  - '  •  -  6 .  6'  4-  '4  E:  ^-  0     <  1  ~  i4  .  0  2 , :  5 : '  R:  P\ )  t  ],  0  .  if:  2  Q  2 1 2 .  7  5r  *  Q 
405  iJ   1  -  0 .  0  2  2  1  5  +  ''11.  Rl  2  i;  'd  '  -  ij  F: 

410  L  4  5 .  1  4  5  ■  ■  Q  2  +   1  - 1  ■)  ■[  F: . '  7  5  :  ■  -i-  :j  „  1 7  2  ■■■■  u  f  7  .  ?  7  ^, 

4 1 5  0  --^ '-:  1  +  4  F'  :3 .  .3 .  -  F"  1-  2 )  /'  ]  -  h-   ■; .  T  F  r    ■  1  F'  n  F   ■  1  +  0 .  0  O  4-  6 

420  G  5   1  .  4  5 1  E  +  u  F'  ( 1  ■-  0  .  Fi  2 . :  F.  „■  - '  \d   i  5 .  F:  t. ■  1  ,  ■ :  P  ( -  6  4  4  *  Q : 

4  25  L  5  2  .  0  9  +  8 .  2  7  * 1  --  ij  2  i  -  :F ) 

4-  F:  0  C;  iF  2 .  5  2  9  E  -  0  2  *  1  - 11 . 1'l  ?  ?  ?  *  C.  Fi f  IF ,  F'  F '?  ^  F  f  2  ■■■■  <  1  ■  -  0  '-■  + 

435  L6-2. 17 

4  4  0     1 G  4  L  4-  +  Q  5  -':  L  '5  1  ■  G  6  *  |._  6 

4  4  5  L  3  -  Rl  2  -  (  Fi .  F!  2  2  7  ■*  ( 1  -  0  =  t)  2  2  Fi  2  *  C  O )  1'  5  .  2  €  2  +•  0  .  O  Fi  0  2  *  L  7 : 

4  5  0  L  9  -  0 .  0  1  3 

455  Fl-IOT '  -21   10/ 3  INF  ) 

460  B4^^293  ■02  t    l-\  1  ':'/  ]  .  071  (F 

465  IF  B<14  THEN  488 

470  B0=B 

4  75  GOTO  435 

4  3  0  t';  0  =  --  4  .  2  4  F:  +  2  .  14  6  3  -  F:  -  ■  O .  ]  0  F:  5  9  G  F :  -i  0 .  0  ij  3  0247  *  B 1 3 

4  F;  F  II 2  =  (  T  [  N  0 '  9  ]  1  Li  0  ■■■■  ■  1 .  2  li  J. ,. :  ->  t;  ti :  >  i  2 

4-  Fi  0  r:  2 <  1  -  E  :■:  f  c  -  if  :f  :>  .■■  0  2  -  ■  1 .  it  1. 1 1 

495  F3-1 

508  Q^^' N  -  F^  2E-Hj3>  t2 

585  R4:MF5:- F  F^-F7^^1 

5  2  5  . J 1   1 0  1  >  .  -  0.0  0  IT  i  1  -r  f  "  -  F .  ■•  F  J  N 1. . ) 

5  3  8  \ :  s  1  -  F  i  -  J 1 : '  +  E -i  p  ( -  o .  4 1 v-  o.  ?  > 

535  0-1-H        909E-04:'*'  F3 -:-'  'F':i.  JRI-JL  '    l  ItJE)t2 

54  0  3^=1/0 

545  F9^- 1  -  '  1  --3  '  +E'' R  F -0 .  4F7't02  :■ 

550  r:  ^  R 1  \:  f:  r  \  3  *  r  4  +  f :  5  ■  F  6  ^»  f:  7  \:  f:  *  i: 

555  RETURN  K 


Fi596/FT2)/' 


lb 


t2F 


<  i  -1-  0 


;'t3*0 

.  O046-:':  L 
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D  -  RE\TORK  (cont) 


560  DEF  FriZ- im>=FriK  :h- :  ..  .. 

565  DEF  FrJC'.U) 
57G  N5=H5+l 
575  Q=Fti:.: 

580  PRINT  ^iSi  ■  ?         :  ; 
585  IF  STRT3=ti  THE     t  _ 

599  EHTE-       - -^Q^Qi 

595  IF  C :    1-   ?  THEH  620" 

600  PRINT 

605  DISP  "CLOCK  RESET" ? 

619  INPUT  Ql 
615  GOTO  575 

620  FORMfiT  "       c.76"»r5.8>Fc..2»  "  ^  ' 

625  WRITE  <  1 5 J €-20 > Q* 1 91 3+ 1 hT 1   i eT4 > ?  I HTQ 1  / i 60- 1 6©* I MT< Q 1   1  Qt 4 > 
630  Q-2S 
635  PRIhIT 
640  PRINT 

645  FORHRT  35^^  F4.  Q- ■  72?'?  "RUM- ?  F3.  9 

650  HRITE  <155  645)-N5^Hv' 
655  FORMAT  "     <-jF9.35 " - 

665  FORHRT  20K? "PROG        F5. y, 4V, F3. 8 
679  WRITE  ':z 

675  PRINT  T-;  ■  '  r,  i  r.  J  :  5Fir9,i2jr'  ••;p$C4»6]r-  "jPSL^jS:; 
6S9  WRITE  :15?855.'C 

685  FORHRT  19fi!F6=3j"  GHz? " . F5. 1 ? "  Ft  DISH" 

690  WRITE  a5.685)F5D 

695  PRINT 

700  RETURN  0 

705  DEF  FHSfQ> 

710  FOR  1=1  TO  Q 

715  PRINT 

720  NEHT  I 

725  RETURN  O 

730  DEF  FHECN0> 

740  E0=0 

745  El^SO^a.-^Kl-l) 
750  IF  B<14  THEN  765 
755  Q2=0 
760  GOTO  738 

765  Q0=4.7-.-       -     :  -    _  - 

770  Qi  =  (7. ----- :       ...  _         .  -  .       :  :  ..  ; 

775  Q2=0.1~  ■;,  :  '  •    .  . 

786  D2=L0t  -  :  1  J 

735  Pi=2*s: ^  .   :  ;  - 

796  E2^ai-  .         ■  .  : 

795  E3=vW.  '  : 

800    E4-9.S    :  ■  _  . 

810  E5-':iC-      :  .  .  .  iuy 

815  E6=0.Cli  -      ,1'  -1 ] 
820  Y=HFNZN8^G/T 
825  Y5=V  -'  V-n 

830  E7^-  ' -  -    "         -  :  ! Z 

835  Es=..-  : ;-  :  :-: 

840  E9-10;j*D9-*=.  1-  k9- ■  y 
845  RETURN  0 
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D  -  REWORK  (cont) 


S65  DFF  FNM<Q) 

870  Q=FHSQ 

875  FORMHT  5':-"TrMP  iiCU  pi,  REL  iiUMD  ..jiiTER  tEilS 

880  NRITE  as?  S75  >  "CL  uiilj  rrr.'EK  iiiiru^' 

885  FORMRT  F9 .  1 »  "  F"  .  F  1 0 .  1 »  "  F "  <  K  iJ  .  i ,  "  X "  sFlO.  1»  "   gci.'-.--it3  %F10.  0  y  F 1 0 .  0 

890  HC  5  ]-=  1  000*E:<F  ^  0  .  It  i    ■:'!,[  4     1  y   !  0 ,.  73  -  <  H[  3  ]/ 1 0  /  T0 .  73  > 

895  Q=i00*<:Hr b ]- uiTM-i[ 6 J.' 

900  WR I TE   (  1 5 ,  385 )  H[  3  ]  - 1 U  n  ML  4  ].-  1  u ,  Rf  5  j   1 R ,  L7  ?  I  NT  ^:  H[  6  ]  - 1  00  > .  Q 

905  RETURN  0 

910  DEf-  FNHCQ:' 

915  GOTO  U  OF  930 

920  RR I  NT  THB3  1  .  "  F I T  TO     "  ;  NT  1  ,  9  ] '  '  liFlTti " 

925  RETURN  0 

930  RRiNT  "TflPE";v3".jnT.n ■■ ; ro; L$; 

935  F 11 R  t'l  Fl  T  5  ?  "  F:  E  W  0  R  "  ,f6.  3 

940  WRITE   (15) 935)N[ 1^10] 

945  PRINT  TRB15jIi$;E$ 

950  RETURN  u 


955  DEF  FNY(N3:' 

965   IF  N3  THEN  1155 

975  IF  F2  THEN  1085 

980  X 

1=FNZ(N0) 

935  Y 

=  1+X1*G.-T 

990  R1=T-H9 

995  I 

5=(Y-1 >*Rl/£50 

1000 

IF  N£=^-3  THEN  1055 

1005 

I5=(  Y-1  ;'*Rl.--50 

1010 

GOTO  1060 

1020 

R=401 

1026 

FORM Hi   "         Kl  K 

2  \:3 

K8  K9 

K  HPR- 

1030 

WRITE   ( 15, 1026) "R-p 

it  S(FU) 

X 1 K ) " 

1035 

FORMfiT  F7. 3) 6F6. 3?  F 

3. 4, F7. 2; F; 

.  E  i 1 . 3 

1040 

WRITE   a5H  1035)  Kl  5  K 

2jK35K6h|::3 

sF/^',R,B2.B3?S[Nn. 

4     EN7(N0)  • 

1045 

PRINT 

1050 

RETURN  0" 

1055 

Q=FNF3 

1060 

FORMHT   ■•  ZERO  LEV  El.. 

"  ?  4X5 "  100"; 

LlVEL"j  4X)  "Y(IiB; 

"  ?  5  /, 

1065 

WRITE   (15j1060>"  K" 

FFiCTuK 

1         i<3]; ") 

3  ( •  J  n  >  T 

1070 

FORMHT  F7. 4, "^TH" . F 

1  1 .  4  «  "  t-TH" 

?  F  1  1 .  4  5  f-  1  1  .  3;  5  F 1  1  . 

,  2^F9.  IhFS.  1 

1075 

WRITE   (15.  1070::'R1,Y 

■n.  Rl  -  10  +  LGT' 

'M:?  ;;i*G.  SE  H0?  4  1: 

,  H3 

1  080 

PRINT 

1085 

PRINT 

1090 

FOR  1=0  TO  5 

1095 

PRINT  THE; '10*  1+6 

1100 

IF  N2=-3  THEN  1115 

1105 

PRINT  20* I ; 

1110 

GOTO  1120 

1115 

PRINT  4*1-10; 

1 120 

NEXT  I 

1125 

PRINT  "(■■;>" 

1 130 

Q=FHF8 

1135 

PRINT  "  N3  ";fli:; 

THFbO,  "F-'UR 

PWR':  FirHi)  '■ 
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D  -  REWORK  (cont) 


1140   IF  H2>-3  THEN  li5u 

1145  R1=R1-25*I5 

1150  GOTO  1245 

1155  IF  F2--0  THEN  1165 

1160  F-P-(X  +  F[ 2  ]*X1  +  Fr 1 ]*X2> 

1165  Q=  I KT  ( ( P--R 1 )  .-■  1 5+0 .  +;-;; 

1170  P=  I HT <  1 0t5*P+8 .  5 >  /•  1 6t5 

11S0  Htl 1??2]="" 

1 135  mi  33.  33  ]=■■  !  " 

1190  FORNhT  h3.0 

1195  OUTPUT   ':;fl$[  1  <  4  ]s  i  190  jN3. 

1200  FuRtlHT  F9.5 

1205  OUTPUT  (flf[ 60? 69  ]? 1200>r 1 

1210  IF  Q<1  OR  Q>72  THEN  1220 

1215  fl$[QjQ]="*" 

1220  NRITE  (15:  1 190)fliF 

1230  IF  N3<N4  THEN  1245 

1232  Q=FHFS 

1235  PRINT  THB7;fi* 

1240  PRINT 

1245  RETURN  Q 

1250  DEF  FNG(Q) 

1255  REM  <G/T  #2  P135> 

1260  IF  Q=-9  THEN  1336 

1265  IF  Q>0  THEN  1275 

1275  N9=N9+1 

12S0  Hl=ril+X2 

1285  f12=M2  +  Xl 

1290  M3==H3+F 

1295  Vl=Vl+K2t2 

1300  V2=V2+Kl-r2 

1305  V3='.'3+K1*X2 

1310  V4=V4+P*K2 

1315  V5=V5+P*>a 

1320  V6=V6+Pt2 

1325  GOTO  136S 

1330  V[ 1  ]=V4-M1*M3/H9 

1335  Y[ 2  ]=V5-M2*H3/H9 

1340  GC 1 ) 1  ]=V1-Hlt2/H9 

1345  G[ 1.2]=G[2. 1  ]=V3-MlsM2/N9 

1350  G[ 2; 2  ]=V2-M2t2/N9 

1355  MfiT  C=INV(G) 

1360  MAT  F^^C^rY 

1365  R2  =  V6-H3t2/N9-F[ 1  ]+Yl 1  ]-FC  2  j*YL  2  J 

1366  X  =  (M3-F[  1  ]*M1-F[  2  3*M2  :--  N9 
1368  RETURN  O 

1370  DEF  FNF(Q) 

1374  GOTO  Q  OF  4985 ? 48 1 5 ? 1 029 ? 5320 ? 5574 s 5624 < SuOS 5 5690 ? SbOu j 5633 
1376  GOTO  1395 
1378  DEF  FNO(Q) 
1380  O-FHHO 
1332  RETURN  O 

1383  DEF  FHV(Q9) 

1384  GOTU  00  OF  457y  ?  2 1 40 ?  4430?  4480?  45-1 8 >  5800 ?  5 1 30  j  523U ?  5542  j  5660  ?  5020 '  3'-i25  ?  5 
1335  GOTO  1395 
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D  -  REWORK  (cont) 


1337  II FF  FNJfQ. 

1  o  9  0  I J  iJ  T  Ci  Q.  0  F  3 1  b  5 )  4  B 5  ■>  5 1)  7  5  ?   2  3  5  ?  '3  ;  j  n  <  3  3  5  ?  3 !  J 1 

1395  R=^4y3 

1406  F6-U 

1 4 b 5  F: F D  I M  C [  3 1  3  ]  ?  i:; [  3  .  :•:  ]  'i  F [  2'  1  ^  Ci i;  4 b  ^  I  3  i  ?  'i  [  3  ]  ' 

1410  D 13:  F  ■   "0  F:  W  ?  1 L  0  H  i  i  • M I  i  i  i  J  j  ' ;  ■■  J  i  t::  I. . ' '+ 1 •  ■  1  H : J  F'  l  t  .■  e  F;  ■ ' ; 

1415  Q=FHB3+FNNu 

1430  GO T 0  Q  0 F  5 0 1 7  j  3  i  1 S  ?  4^ 3 6  "S  -  3 2. 2 5  >  4  £; 4  ' 

1435  p:::403 

1440  n=:FHFl 

1443  D I  :E;  P   "   \< Fi  F"'  \\  D  H 1'  F i  0  rl  0 

1444  Fi=FF]Flu 
1455  RESTORE 

1460  n  I  3  F'   "  S  T  h  R  T  0     Uh '  I  ■ '  F  it ' '  " 
1465  14  C  1  ^  1  0  ]  ^=  I -I  Ei  3  +  F  Fl  n  1 !  i.:  • !  i  ]  O  1  -  0  „  1 
1470  Q^^FNVb 
1600  R-404 

1639  IF  F3=0  THEN  1645 

1640  0-FrVv'l  ] +FITV9 
1643  NflT  M-ZER 
1645  \\[.  1  <  10  ]  =  H0 
1645  R=405 

1650  3 ERROR  Z5' 3195 
1655  F3  =  H^n..  1=4-14=^=16  =  0 
1660  E5  =  6."3600 
1665  F4-F4+1 
1670  HS=M[  40  5  1  ]  i-l 
1675  Q-F4+3+F7*33 

1 6  3  0  L  0  Fl  I!     I)  Fi  T'  Fl  S  (  1 0  ■  F-  7'  '>  s  Q 

1 635  PR  I  NT   ■'  F I  EE "  ;  0  ^  ! '  :f  ^   RUt-i  -OFT "  5  Fii:  1  1/ 1 OO 
1690  P  R I  FF  T'  T'  h  5  ?  S  J ,  H  f  ^  '  F'  F:  E:  b ' '  ?  Fi  C  3  T  ■ '  1 0  0  0 
1695  Q==FN33 

1700  IF  N 0  ; 5  OF'  Ii [  1 ,  3  ,1  U  1" fi E Fl  1 6 4 5 
1705  Q3---Fl[  3  1/1000 
1710  Q-F3-Q3 
1715  R-406 

1730  IF  F3  hHD  Q  THEN  164  5 
1735   IF  F-Q3  THEN   174  0 
1730  F==Q3 
1735  G!=FNJ2 

1740  N  7  =  ( Fl  [:  1  ] .  ■■  1  0  0  -  I N  T  ■  F  l  [  1  1  /  :l  O  O )  )  *  ].  0  O 

1741  N6==INT(H[  1  ]/100  ' 
1743  E3=^34  --360/C0S3[;  HU;i  3T 
1743  N-6*(N7-r' 

1745  IF  FS=0  THEN  17'. 3 

1  7  4  6  C' r  4  +  F\\ F  5  ■!  F  N F   -i  r  IT o 3 U 

1747  HI  40  H  1  :i-HF  40  h  1  ]  !■  i 

1743  GOTO  1645 

1750  R-40? 

1755  N3=N9=0 

1760  N-N+1 

1765  SERR0R  35::  31  95 

1770  fl7  =  lNT( ' 41-  1  )/5':'-i  1 

1775  H3  =  N+3-6:rH7 

1730  T 6=4 13  r 4 

1735  N4-IUT6-?;] 

1790  IF  T  6   1   THEN  ISOO 

1795  N4^Ii[3j3J 

1  3^.10  V 7---I'l  F6  -  7  ]  ■■■  1  00 

1305  F]  --III  FFi  4  ]/  1000 

1310     p]  i  6,  S  ■]  ■  1000 

1335  R=  )i[  T  r,,  ]  ]/100  i-l;;.i 

13-'0  E^^DF  F6, ]  ■  100 

IS  •;5  IF  F]  =0  MNH  N3tt    ;   I  lit  N   1  355 
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D  -  REWORK  (cont) 


1840  R=4ys 

1845  Q  =^  f-  r  U 1 1  +  F  H  C 1  +  F  N  K  M  0  r-  F  M I  i  1  i  F  i  I J  3 

1859  PRIrlT 

1855  FOFNRT   "  NEHS        flZH'liirii  HPfiH        TIME'HkS'^         nr^xfT  FLFV 

1860  WRITE   (15s  1855'  '  CUI      I  'l  !^  i         r  \\" 

1865  FORHiiT  Fi.Qj  "sec" F  1 1 .     1- 1  U  =  4 5  f  11 .  '3  j  F9 .  3 ?  "  ds-=i"  5  F'^".  2' Fk.  fi.  :':FF..ti 

1870  B=FNQL 

1875  V9  =  Ff;:'<He  :'*G--H5 

1880  l-jRITF   a5<  1365:'        !:rL-^:-  Fi?  E/'Sy^  Fl ;  Ei  s  L?  HS-  H6j  h7,  H 
1885  TRFiH3FFR  T[  MQ,  i  j   i  r i 
1890  Vl=i'll  =  e 
1895  PRINT 

1900  IF  W£>-2  hHIi  Fl^n  THEF!  3  320 

1905  FORMRT  "dT="rF6.3j  I^'Kj  "T  'Tfi  =":.F?.4>  "  + "  ?  F3 .  5  ?  "  *CSC  L"  j  ISKjFS.  1 

1910  WRITF.  (15..  1905:- V9j  Nt  13.  2  j»  ML  13?  5  Jj  S$ 

1915  PRINT 

1920  R=499 

1925  P^U=Fi[  9  ]  ■  1944 

1930  1=<A\L  iS'?3  +  HL  IS?  6  J/3IHL;--*i-l3 

1935  IF  H2#0  THEN  1945 

1940  Z=T  -H^ 

1945  IF  H2  — 3  THEN  2443 

1950  V=LnG(0.  5>*4.--<E-39*E3.-E5.-  N4  :'T2 

1955  Q1=F1 

1960  W1=F1=0 

1965  F1=FHV2+Q1 

1990  S3=K 

1995  M1=F[ 1  ] 

2000  FORMOT  "PfiSS  #FIT     BFTcC;-  *HPBH  T/To.  DT(" 

2005  WRITE  ( 15?  203O;'3i' "  ::'.-Th        FEni  t      SLOPE  T-FIT" 

2010  FORMhT  F3.  65  FF,     F3.  3n  3X'      '  ?  r  i3.  4f  F9.  4.  "  +-"  ?  F6.  2?  ""r'  ?  F7.  2^  FT.  2.  ■'"■;"  ?  2F6=  1 

2015  Q=10e*SQE';:R2-'Hy   -  FL  3  ] 

2020  R^lyy^':  (S3-NL  13?  3]-r-i[  1  Sj  6  1/SIHL  >  ■- V9 

2925  NR I TE   (  1 5 ?  29 1 9 >  1  ?  N3  ?  BET ':.  C:  >  >  S3 <  F L  2  j  5  Q ? .V7  ?  F!  1*290/33  ?  Fh  "  " 
2939  R=410 

2035  N[ 18^2]=S3-H[ ISsFl/SINL 
2040  T=(NC  13-2]  +  FC  1 3  ?  6  ]/3 1  ML *H9 
2045  N9=9 

2050  Q=B/120*ES/E5+1 

2055  FOR  H3=V7-Q  TO  V7+Q 

2060  IF  H3<1  THEN  2099 

2065  P = U  *  E  X  P  ( n  [  T  6  ?  H  3  i  ■  7  ]  .-a  9 1 4  > 

2070  X1=2*(H3-V7;'--  H4 

2075  X2=K1*K1 

2080  P=^L0G(P-S3-Hl*Xl : 

2085  Q=FHGH9 

2090  NEKT  H3 

2095  P=FHG(-9;' 

2100  V=F[ 1  ] 

2105  Wl=-r[2]-  F[  1  ]  ^2 

2110  E6=V7+W] ' M4  3 

2115  TORMriT  ¥?..C3fft...:- r9.3.  F  :n  3j  -de -j"  5  7Xj       5  Fl  1 .  4.  FG.  2j  "";"  •  F7.2j5Kj  "-"  >  Sr.,  " - 
2120  E7  =  E5.--ES^fi4*30R  I  ubCi.;...- 
2125  Q-E;;P(X-F[  l  ]  +  m  i  3":' 

2139  WRITE  (15.2115>2jM9«  HE T'-.C)  ..Fi-%L!>  "         ?  199^  SQR' R2--H9':'.-U.  EG 

2135  D[TG.7  3=190*EG 

2136  GOTO  2208 
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D  -  REWORK  (cont) 


2MQ  f?-:411 
2145 

IF  Fl^U  THFN  ili-.n 
£15^5  |>:FH',  U 
21f.d  Flip  M:5-l    lO  M4 
2165  F^^4J-t;:r'  ill  Tt<  H3  r,' ]         -[ : 
2170   IF  F  l-^M  THEN  21&i! 
2175  Q=FNVN3 
2180  X2  =  2:'   H3-V7  ;'/H4 
2185  X1-E;^'F':  V*'  X2  -  141  ■  t:-'':' 
219U  Q^FNGtl^ 
2195  NEXT  M3 

2205  P^^FhiG'-y' 

2206  PETUPN  0 

2208  R-412 

2209  0"Ftrv'2 

2210  IF  F" [  2  J  :  1  .  8 E: h  0 ri i-i [i  [■  [  ?  1  K .  3 F - u T l-i E r-l  2 2^ 3 0 
2215  PPINT  "UMliEPFLuli'' 

2220  DC  T  6 1  6  32700 

2225  GOTO  2235 

£230  r!CT6!.e3=LGT';.FC2]--*lMi4 

2235  IF  H2w0  THEN  22611 

2245  fl[8]=Z*lE*-04 
2255  fir  10  3=^E7+lE  +  04 
£258  R-413 

2260   IF  FI^O  THEN  2230 
£265  PPINT 

£270  WRITE   a5.  2000)3$;  ".'  '1  R         Pf|iK#       SLOPE  T-FIT" 

2275  FOPMhT   F2  .  0 '  F6  .  y  ?  f  4  .  ■  ■:  F':' .  3 ?  ' 'J.;:  \i "  -  f- i 0 .  4  j  F9  .  4 ?  '    +-"?  F6  =  2 «         2F7 .  2 2F6  .  1 

2280  0=  1 OO-' SOP  ^  P2  N9  i  FIX] 

2285  R=ie0*(X-N[  13j2  J-NF  j3:.  f.  J-  3IHI.  -  ^'9 

£290  WRITE   ( ]  5'  2275)35  N'-'.  i:L  T  iL    <  t7,  'X     2  ]-      E6)  FC  1  ]:':200/X'  Hj 
2295  0=2 

2300  IF  N2tr2  THEN  2310 

£305  0-5 

2310  Q^FHIuj) 

2435  GOTO  2540 

2440  P^^414 

2445  f1l=Vl=0 

£450  IF  Fl-0  THEN  2460 

£455  Q==FNY0 

£460  FOP  N3=^l   TO  N4 

2465  P  =  U * E X P  •:  ] J [  T 6  >  N 3  +  7  l/\  0 1 4 ) 

2470  IF  Fl^O  THEN  2430 

2475  0=FNVN3 

2480  MI^Ml+p 

2485  V1=^V1+P  +  P 

2490  NE:;T  N3 

2492  M3=H3-1 

2495  Z=ni  ••  N3 

£500  FORNHT   1  1    ,  •■  T/TH  '  .  1  OX ,  "  S I  GMli " .  9K »  "  MEflN " ,  SK  j  "  iiPJS " '  9X ,  "T" 
2505  WRITE  a5<25O0) 

£510  FOPMHT  F 1  6 .  4  <  F  1  4  .    .  "   ■.■.FII.Xh"      ' «  F9  .  O  -  F  1  3 .  1 
2515  0  =  1  OO  +  SOR  K  V 1  -M  1  1  3  ■  N  ■..  ■  -  (  N  J  - 1  '>  .  -  2 
2520  WRITE  (1 5  J  2  5 1  0  Z  <  0 ,  Q  ■■-  '3  0  P  •:  N  3 -D  ?  N  3  ?  Z  *  H  9 
2525  PPINT 

2530  N[ 18'2]-Z-N[ 18-6  J  3] NL 
£535  Q=FHI3 

2540  IF  N2<2  TflEN  1750 
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D  -  REWORil  (cont) 


£550  Y5=n2 
25by  .J=V£ 

2960  Q=FNF4+FHF5-FtiF9  +  FtiL2y 
2962  ri2=Y5 
2964  V2=J 

2975  STORE     DfiTfi  #<  10-5-.-F7>  » F4  ■  '       -  .1 
2988  \K4kU  1  ]=Mr40?  1 
2995  GOTO  1645 
2998  R=415 
2995  Q=H8+1 

3003  HE  U.  2  ]=H[  Q»  3  -  j=!nr     5        Qj  6  3=6 

3005  0=FNI5- 
3010  Q=FH35 
3015  GOTO  1655 
5018  R=416 

3020  DISP  "STORE  PlRT  M&Nve-   .  ■ 

3021  Q=FHB2+FNH1 

3022  IF  Q=0  THE^^  3824 

3023  Q=FHVi2+FHS10 

3024  RETURH  0 

3025  R=417 

3026  HC6j  11  ]=F 
3028  N[  35  9  ]=H9 

3030  TRRHSFER  ft  TO  TLy^lJ 

3035  FOR  1=1  TO  18 

3040  NC9)  I  J=T[9j  I  ] 

3045  HC  10 J  I  ]=T[9.'  I  +  IO] 

3050  HEKT  I 

3055  Q-18-5+F7 

3060  Qi=4^F9-3+17*F7 

3065  STORE     DflTfl  ^  '  ■  :    -  "1 

3070  STORE    DfiTfi  ^   ■    :  ??H 

3075  FORMAT  "         --L       :     ."H  FILE  'j7X..  "H  F  I  LE  "  »  8K  »  "  TAPE "  »  7H  »  "  SUMRRR  V  SET"!4X 
3080  WRITE  a5.3C  : 
3085  FORMAT  F9.3'- 

3090  WRITE  <i5j3e£i   :  2. V8sF9,HE 1j 10] 

3095  Q=FHS38 

3100  RETURN  e 

3113  R=41S 

3120  Q=FNJ3 

3125  F5=0 

3128  DISP  "RENORK  tt": 
3130  NC l! i0]=FHNN[ l5  iO] 

3135  F6=N0-=1 

3136  IF  F#0  THEN  3148 

3138  F=7.5 

3139  Q=FHj2 

3146  Q=FHJ4+FHJ5+FnL?-iFMLc         .   ■"■  t»L2+FKL3i-FHL  4+FNL6+FHL7.  24FNLS.  2+hMLl .  2+FNL2.  'd 

3142  IF  F5  THEr^  3148 
3144  0=FNJ7 

3146  GOTO  1395 

3143  C=FNV12-^F■!V18+FHV6 
3158  GOTO  1600 

3165  R^419 

3170  DISP  "RESTART  §  U^'  ', 
3175  INPUT  Q 
3180  F2=0 
3185  H=Q-1 
3190  GOTO  1750 
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D  -  REWORK  (cont) 


3195 

R-420 

3  2. 0  i  J 

WhllT  1000 

3  2  0  '5 

Q-"Fi  13  6 

32  1  0 

IF   ;:5  =  5b   THEN  1595 

3215 

IF    35 #61    iHEN   It. 4 5 

321  5 

Q-FNV'12 

3217 

IF  re^O  THEN  1395 

321 3 

IF   F5=0  TMEN  3135 

3219 

SERFuF  75' 3221 

3  2  2  0 

GOTCi  5135 

3  2  2  1 

Q  --  F  N  V  6 

J ; 2  2 

G  0  T  0  1  6  0  0 

3225 

F-421 

3226 

])$-"  '■ 

3  2  2  S 

IF  F6  TFiEM  3240 

3  2  4  0 

Q  =  FHS6  +  FNiil  +FHCi. FN 96 

3244 

RETURN  0 

3  2  5  5 

R  =  422 

3235 

FORNFiT  .■■■9  ■■RUN ■■■SET  sTRR 

ele:v 

0/T 

3290 

WRITE     15^  5235) "  FREQ 

V  -" 

\  0  c 

mef 

3  2  9  5 

FORNhT  F6. 2?  F7,  1  j  2F3„ 3 n 

6F7 

.  3 

3  3  0 13 

I"0 

3305 

I  -  I  + 1 

3310 

Q==Ml  I  ?  1  ] 

5315 

IF  Q--THTQ  =  0  THEM  3375 

3325 

U0  =  M[  1)6] 

3330 

Q1"M[  1)7] 

;!335 

Q2=M[ 1)3] 

3340 

-J~\M  1)9] 

3345 

E=FlE;SQ 

3350 

TRANSFER  TC lOO  +  E-iO  - I  NT 

■  .  J.  \:} 

*E) , 1  J 

!U  S$ 

3  3  5  5 
3360 

WRITE  (  15:1  3295  )M[  I :.  10  l;. 
IF   IFFr(  I/3:-I/-3  TFIEN  33 

7  0 

" '  S*  )  (■ 

Fi[  I )  2 

3365 

PRINT 

3370 

GOTO  3305 

3375 

Q=FNS30 

3376 

RETURN  0 

3380 

R==423 

3332 

N0~Q-1 

3334 

fl[ 3  ]=10*B5 

3386 

H[  4  ]=^10*E6 

5405 

RED  IN  MI  FT.  40?  1  1^  lO  ] 

3  4 1  0 

SORT  MjCjQ 

3415 

Q==FNS5  +  FNFM.H9~4^r;  !  ■t  FFF>4 

3420 

REnif'i  Ml  40?  10  ] 

3425 

IF  M[  40'>  1  J-:3  THEN  3535 

3430 

FOR  J--^19  TO  26 

3435 

IF  J^-^23  THEN  3550 

34  40 

I=N9^-^0 

3-1  45 

I    I  +  1 

3450 

IF  M[  I  )  1  ]  0  THEti  ,-;4h5 

34  5  J 

ML  J«  9  ]=41f  J,  10  ]^-ML  J  ■<  J-i? 

] 

3  4  6  0 

FOR   1=^1   Tij  M[  40  0  J 

3465 

f;i=m[  I  )  1  j 

34  70 

IF  XI         0  THEN  :;'.10 

3475 

X2=^1/SIN:'1 

3430 

p-M[  I )  J  J  ] 

3-;:";  5 

Q^FM3M9 

3  4^  3  0 

IF  R:  mi  J'  9  ]  THEM  /-.Om 

3495 

Nl  ..N  9  ]:-F 

3500 

IF  P  Ml   F  ;  u  J  TH(..;i    r  ifi 

5505 

Ml  J'      J  :-F 

5510 

mff;t  I 

NUF' 


-TH     HPBW#1  HPi3Wtt: 


•  M[  I )  3  ])  Ml  I  ,  4  ],  M[  I )  5  ]'  00.  01 ,  q; 
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D  - 


REWORK  (cont) 


3515  Q=FNy4 

35£o  IF  J>19  THEN  35-^: 

3525  PRINT  ThB35?  "if  PT;   ^  t  ' 

3538  HE  1 ?  9 ]=Hy 

3535  PR! HI 

3540  Q=FNy3 

3545  Q=FNS3 

3550  NEXT  J 

3555  Q=FHS10 

3560  RETURN  0 

3565  DEF  FHL<Q8> 

3570  R-424  . 

3575  Ii*="" 

3585  J=INTQ0 

3585  LS=i8*<Q&-J> 

3590  J=J-MS 

3595  IF  H[J.9]#0  THEli  itie 

3600  PRINT  "IiflTfl  NOT  FIT  yETii"jFHB6 

3605  RETURN  O 

3610  IF  LO  THEN  4198 

3615  F2=FNV3 

3630  IF  F6  THEN  3669 

3625  DISP  "FITse^CSCj  i=L.iir: 

3630  F2=FNB2H-FHN0 

3635  IF  NCJ5  9]=0  THEN  3590 

3640  DISP  •■ZER0<r1IH= 'nil  Jj9]i  ■l1hK-="?Hr  J,  10  ]•■>■■; 
3645  INPUT  Rl 

3650  DISP    TULl  SChLE  > nfiX=" ^ NC J, le I?" V ; 
3655  INPUT  Q 
3660  I5=Q-R1 

3665' IF  Rl   <=  5  3  RNl.  Ki-'  I5  >=  N[J?!ti]  THEN  3699 

3670  BEEP 

3675  DISP  "RRNGE  TOO  - 
3680  NfilT  1003 
3685  GOTO  3640 
3690  15=15-^50 
3692  L=30 

3695  Q=FNS3+FNHl^FNCl+FHKH-FHni+FNI3 

3700  PRINT        =  FIT"? 

3705  B$="#50+*My" 

3710  FOR  1=1  TO  Nl-2 

3715  TRHNSFER  T[  I  ?  1  1  10  Zi- 

3720  PRINT  Dftljli;"  =  "^S*? 

3725  NEXT  I 

3730  Q=FNS3+FNH0-iFHF2 

3735  FORMHT   " (UNIT=" . F?. 4 .  •  > ' 

3740  PRINT 

3745  FIXED  3 

3750  FOP  1=0  TO  5 

3755  PRINT  TfiEt  10^  1  +  6^  ^  Pi  <-;ii^I*I5> 

3760  NEXT  I 

3765  STRHDRRD 

3770  NRITE  (i553735>i5 

3775  Q=FNFS 

3790  PRINT  ■■  ELEV  "  "  " 

3795  FORMRT  4X<  "VhLUL  =^  :::T  ' 

3800  IJRITE  (1553795> 
3S05  FORNHT  F5. 1 
3310  1=N3=0 
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D  -  REWORK  (cont) 


3815 

R-425 

I  ^- 1  +  1 

'-'       iL,  -  J 

3  330 

If-  I  ::^M[  4u.  1  ]  ]i\u\  4r:- fi 

Ll^MC  I'll 

3335 

T2=n[ I , lU ] 

3340 

IF  LK0  THEH  ::&:'fi 

3345 

H3^N3+1 

3350 

IF  H3- 3n-IHTv            '  TfiFN  .-Xrii. 

•~i  i~i  cr 
O  O  .1  i.-. 

Q=FHF3 

3355 

PRINT  THE:1C1-HI 

3360 

IF  H3>1  THE;:H  33;iS 

3365 

L=-IHT(L1 

3370 

IF   I  NT  a  ■■:i.)-L -5-0  THfN 

■i 7  5 

L-L+1 

3330 

G  0  T  G     3  7  O 

3335 

Jl=M[iiJ-17] 

3390 

IF  Li   >:=  L  THbN  o'^'^e 

3395 

Q  =  IHT(  ( Jl  -Rl  .>/  I':  1  M.  ^r.i  f  1 

3900 

X=10^':  (10  +  L  1-INT'  IrHli  ■>  ■> 

3905 

B$  =  ri*[  >!,r.  ] 

3915 

W 1  =  [  J ,  2  -  F  2  ]  +  N  [  ..  U   -  F    1  :c '  ,  F  2  -  f 

:i  ■■■■•SINL1.+  (F2=1  )*L 

3930 

X=INT(  (Wl  -Rl     IS  H-i.  ^,  ■.-!  ■[ 

3935 

WRITE   c:  15,  :;iyybn  1  ; 

3940 

R$^"  '■ 

3945 

fi$[li52]="" 

3947 

IF  X>52  THEN  3955 

3950 

3955 

3975 

FORNRT  F9.4iFy.2 

3980 

WRITE   (15- 3975)  ■■  "jHf.Ji- 

<  T2 

3985 

GOTO  3820 

3990 

E-N[ J, 4-F2  1 

3995 

1 1  =H[  J ,  2-F2  ]  +  Nr  ,.i ,  e -F2  ]*  ( (  F2--^i; 

3;'/siN[  +(:f2=^i  ;'*L> 

4000 

IF  J  =  21  OR  J=22  UK  J-24  Tf-iEN 

•-1 0  1  0 

4005 

E  =^  F  H  V 1  +■  (.  C  2  =  1  >  *  1  0  [.  G  T  (.  1  i  E   1 0 1 1 ' 

■'  -1-  C  2  #  1  )  ^  E  *  T  1   1  0  0 

4010 

Q=^INT':;E/I5-i-e.  5) 

4015 
4020 

IF  Q>1   THEN  404'i 
Q=l 

4045 

X=INT(  (Tl-Rl  > /I'=;  +  0, 

4050 
4060 

PRINT  l; 

FGRNh'I ,51"--" 

4065 

OUTPUT  (m,  4060'' " " , 

4070 

IF  X-CKl  THEN  4035 

4075 
4030 

H*[  1 ,  K-Q  " 
H*[  X-Gl,  X-Q  ]="  !  " 

4085 

Hl-[  X,  X  ]="  .  " 

4090 

IF  X-^Q>51   THEN  41  GO 

4095 

H*[  >'.+Q,  52  ]=" " 

4100 

fl$[  X  +  Q?  X-Hj  ]  =  "  !  " 

4150 

FORMRT  FIO. 4, "   h -" , P7. 4 

4152 

iii  =  mL  1  ,52  ] 

4155 

WRITE  '.:  15,4150)"  ';H*;Ti,r 

4160 

L-L  +  5 

4165 

GOTO  3835 

4170 

Q=FNF8 

4172 

PRINT  TfiElO'Fll- 

4175 

m=" " 

4130 

Q^FH336 

4185 

RETURN  0 
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D  -  REWORK  (cont) 


4190  R=-42fa 

4195  RE  HIM  Y[:3] 

4200  YC 1  ]=10 

4205  Y[ 2  ]=50 

4210  YC3]=10 

4215  IF  Fb  THEN  4268 

4220  fli:="b/T:  " 

4225   IF  J- 19  THEN  4235 

4230  fl$="G/Ta: " 

4235  rUSP  fl$r^0=CSC  F  ITj  l^LlrlEHR'  ; 
4240  F2=^FHB2  +  FNH0 
4245  REIHH  YL  3  ] 

4250  II I  SP   "  ELEV  ( DEG  j  ;  31  llRT  ■.:  3  fi  ip ,  STEP  ■  5 
4255  INPUT  YL  1  ]5YC2].:T3  J 
4260  R=427 

4265  Q  =  F  N  S 1  ■+■  F  H  H 1  +  F  H  C  0  -i-  F"  \  \  K 1  i  ■  I  - ■  l  -i  1 1 1.  -i- 1"  l\  1 3  '  F  ?  i  S  1  +  F  N  l-l  8  +  F  H  F  2  +  F  N  3  1  ' 
4270  PRINT  THE24>"+  =  LIHEiiK  CONTR  I DUT I  ON " 
4275  Q=FNS2 

4230  FOR  L^YC  1  ]  TO  Y[2]  3TE!-'   I'f  3  J 

4295  T  R  R  N  3  F  E  P.  T  [  1 N  T  (  ( J  -i-  2 )  /  2   ?  1  +■  2  8  *  i  J .-  2  1  W  T  C  ..J  /  2 )  >  ]  T  0  E'  * 

4290  B$[ 10  ]="-" 

4380  FORMhT  F5  W'  de  ? :  "  ?  1  3K ,  F7  .  3  >  "  +-  "  j  F5  .  2 ,  "  dB  ( "  .  F6  .  1  »  "  ■•;  > " ,  4K  ?  F6 .  3  ■<  "  GHZ " 
4315  N0=1+FNV1 

4  3  3  5  N  RITE  ( 15,4  3  d  8  >  l... ,  B  t-  ^  1 1 ,  ]  ti [.  G 1"  1  -r  E  ■•- 1 8  0 ) ,  E ,  F 
4340  Q-FN31 

4345  FORMAT  "     E-3       E-F       E--'i'       E  Kl     E-K2     E-K3     E-K4     E-K5     E--KF  " 

4350  WRITE   (;15,4345>"E-K7  +E  KS  +E-K9  E-TR" 

4355  FORNRT  F5 .  2  ?  "   'M  2F6 .  2  s  "  " 

4356  Q=C2 

4357  Q0=Q*E9 

4358  Q1=Q*B1 

4368  I'J  RITE  <  1 5  » 3  5  5 )  Q  *  3  ?  Q  E;  ( j  >  Q  S' '  i '  1  ?  Q  *  E 1  h  fi  *  E  2  j  Q  *  E  3  ?  Q  *  E  4  •■  Q  *  E  b  s  Q  *  E  6  ?  i]'!  *  E  7  ?  9.  ^-  E,  3  ?  Q  8  5  Q 1 
4365  R=423 

4378  IF  L0#2  THEN  4485 

4  3  S  0  Q = F  N  3 1  +  F  N 1 4 + F  H  F  6  +  F  \\  I-  1 0  -i-  F  N  F  5  +  F'  H  F'  '9  +  +  f  ■  N 1 4 

4485  Q-FNS3 

4410  NEXT  L 

4415  Q=FNS10 

4420  RED  IN  YE  2] 

4425  RETURN  0 

4430  R=429 

4435  Q 1  =  <  J  =  1 9 )  -I-  ( J =20  >   ( ^.1  2  5 )  -r  <  J = 2  6 ')  +■  1 8  *  ( -.1  -  'k  4 )  4'  1 0  8  *  ( ( J  =  2 1 )   (,  J  -  2  2  > ) 

4448  R1:=1NT(Q1*H[  Jj9])/Q1 

4445  Q  =  I N  T  ( Q 1  *  N I  -J  ^  1 8  :]  -i- 1  >  •■■ '  Q 1 

4450  IF  < Q -  R 1 )  >  1  0 R  J > 3 8  T hi E£ H  4 4- 7 5 

4455  IF  ( N  [  .  J  J  9  ]  -  R 1 )  >  ( Q  -  F-l  [  .J  j  1 8  ] )   T  \  \  F  i  1  4  4  7  O 

4460  R1=R1-1 

4465  GOTO  4475 

4470  I J  =  Q  4 1 

4475  RETURN  8 

4480  R=430 

4435  Q-FNG(-9) 

4498  R2=V6-M3t2/N9 

4495  N[ Jj 5  ]  =  YI 2  ]/G[ 2s 2  1 

4  588  N  C  J  ^  1  ]  =  ( N  3  -■  N  [  .1  ^  5  I  s  1 1 2  >  -  N  3 

4505  S  =^  3  Q  R  i  (.  F:  2  -  \-\  [  J  j  5  J  -  Y  L  2  ]  ..•  /■  ( N  9  -  2 ) ) 

4510  N[.J!3]=3 

4515  N[ J 5 7  ]  =  S/3URGL  2i 2  1 

4520  N[  J  J  6  3^Y[ 1  ] -  GC  1  ,  i  1 

4525  Nl  J  J  2  ]=(H  :;-H[  .1,6  J. Ml  IF' 

4530.  S3"SQR  ( F3"\\i  J  ?  b  J  YL  1  ..i r-iy  2  .■ 

4535  HL J, 4  1x33 

4540  NL  Jj  3  ]  =  S3/SURG[ 1 , 1  J 

4545  RETURN  8 
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D  -  REWORK  (cont) 


4548  F^-4--:l 

4  550  huR  F2=0   TO  1 

4555  u^FlirS 

45bM  Iie;-;t  f£ 

45b5  RLfUPM  n 
4570  R-4:;2 

4575  H1=^M[  l  -  i^i:  ('Pui  1  -  j 

457b   IF  J=19  OR  J  =  20  TliFII  •i'..:::iJ 

4578  Hl  =  i0rLGT'::  1  +M[  J-  4  -F.:::  ]  -ML  J?     Fl  }''i  3  -SQRMi:  1  ?  9  J 
4580  Q-(F2--0:^''SIFIL.+  ':i-    ■  i.  ^  --l 
4585  M  =  M[  19j  2--F2  :Fi-N[  V?^-.:..  -F/  j^i' 
4600  T  1  =-  \-\  L  J  J  2  - 1'-  2  ]  +  H  [  .J      f !  ■  ■  i 

4602  C  2   1 <:  (.  J  -  2  5  >  +■ J  -■•  2  6  ■     ■  .  1  -    1  -  ■■  b  'i- ■  b  9*1.  4  ■■■  T  1  )  ■- 1  > 
4610  H^=10-i  (N -lO 

4615  G  =  1  f  1  "i"  ( (HE  2 13 1  2  F  >  ]  -i ■  1 1  i:  2 1 ;i  ■>  6  -  F  2  ] *  i ■'! :.'  • '  1 0  >  *  F ri ', '  9 

4617  T  =  G/rl 

4620  Q:=FNV12  +  FME1 

4635  Y1==C8*Y5 

4640  S  =  T[  NO  J  10  ]  .a0 

4645  Bl  =  Ii3 

4650  E  =  i:  2  *  b  Q  R  ( 'i 't'  2  +■  \'  1 1-  2  •!■  i:  Fi  T  ,2  -t  E 1  ■  t ■  d + E  F:  1 2.  -i-  L  3 1 2  +  E  4 1'  2  +  E:  5  1 2  +  E  6  ■"|-  2  E  7  T  2  +  B 1  i"  2  >  ■  E  3  -i-  E  9 
4655  RETURU  0 
4815  R=433 
4820  H$="  " 
4825  Bt-="  " 

4830  FORhflT  6X  -  FS .  4  j  "   +  ":iF7„4,":'       F"jr9.5i.  "  +-"-SFS  =  5 

4835  TRFlHSFER  Ti:  I HT  <  {  J  -kE:  ■■2  :>   1  +20  *  ■  J/ 2-- 1  HI  ( J/2  ;.•  >  ]  TF  $[  i  ,  1 5  ] 

4  8  4  0  T  R  Fl  \-\  S  F  E  R  1"  [  1 4 ,  1  6  -  F'  2  '5  1   I  Fi  E  f  [  1  n  2  ■ 

4  8  4  5  l\  R I T     (  1 5 ,  4  8  3  0 )  H  4  ,  M  [  -  J  2  F  2  ]  ?  F! !:  J  ?  4  F  2  J  h  H  [  J  j  6  -  F  2  ]  ?  IT  [  ..^J  ^  3  f'"  2  ] ,  B  ^> 

4846  RETURIT  O 
4  y  4  r'   r!  ~  4  3  4 

4  8  4  8  P  R  I  Fl  T  "  f'^'  i.  T' :  1 G  T  j  2 ■■■  T  o.  ^  3 \i  F  B  W  tt  i  ■<  4  F!  F  F \A  #  2  ?  6  V  -  F  Fl  C  5  7'  IT  E;  F  ,  8  FT  U  f  " 
4  8  4  9  F'  F:  I TJ  "F   "  2. ,.  1  ^  E  R  R  1"  Fi  F  L.  E  h   f;  .  2:  -  +  ■/  li  1  n  d  l...  l.  L  I G  T " 

4850  Q=:^FF!B2  +  FFT31  +  FFIfTl 

4851  Q  =  FriLQ 

4852  GOTO  1395 
4863  R=4  35 

4  8: 64  ni  S  F  "  D  E:  L  :  R  0  FT  ■■■  8  E  T  ( O  =  E ) '  I T  '  " ! 

4865  Q^=FNB2 

4  870   IHPUT  Q 

4875   IF  Q==0  THEIT  1395 

4830  SEFlRCH  Mj  Cj  lO?  Q  -  Ql  , 

4885  ri[  Ql ,  1  ]=■  H[  Gl  J  1  I 

4890  GOTO  4864 

4895  R=43e. 

4900  C  1  =  2,99  7  9  2  5  E  -i-  O  8  •'!  ■  2  '  ( 3  *  F  I  >  1 .  3  3  0  5  4'  E  -  2 : :  *  ( F  *  1  Fi  1'  9 )  T'  2  > 

4905  TIO--0 .  9/FT2 

4910  G  =  B2*(Ii*F  0.  313  '  12 

4915  B9^^^^2*C1*1 .  330541:.  -    j -G 

4920  B  -  21 0  '3  5  IJ  ■  ■  F  S  Q  F  (  B  3  B 

4925  FOR   1  =  1   TO  ITl 

4930  Q^=C-T[  I J  15  I  -- 10 

4935.  03-  n;  1  1  6  ]  ■  1  E  i  03  '  f  l  I.  ^  4  ,i  ^  i '    l  l  '<  h' , 

4940  F!2  =  EF;F'  <  TL  I  H  6  ]  ■  1 E  mm  ■  F'  ■  ■  ■4.:  I  ■<  i  .,1  ■  ■  I '  T[  1  ,  1 8  ]^(  1  GO )  1  23 
494  5   I5  =  3[  I )  1  ]n  [  1  ^  8  ]   lOi  ii-'  St  :  »  1  1 

4950  H^03  :-  ( <  F.  JL  I  ,  ] 1  l  uy\ '  ■  '  1  r  I F  1  O  2  J-v  1 00  :  1 >  ^-  ( 1'  [  1  -  7  j.- 1 1:00  t  i  [  1  •  5  1  ■  1  F  +  0  ? 
4955  M  Fi  :-■  F"  4-  ( ( f i  ■  Fi  j  -  ■ .  f<  <  1 1  <  >  i '  i.'i  /  i  2  {.  > 

4960  0  t: F  -  T  L  I  <  i  6  I  ■■  I  L  i  0  4  -  2  .■'  -  i:  5  r '  !  I  J  ■    I  1  <  1  2  1  r  1  2  0 )  1  H 

4965   u  1 1  1  0  ]  =' IJ  -  0  2  .  ■■'  2  2  1  u  tj  u 

4970  3;  I  1  ]-+j2 

4975  Ul:T1    I  ■  - 

4930  RETOKi^.  0 


r 
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D 


-  Rii,','ORK  (cont)" 


4985  R=457 
4995  F?=ti 

50t^M  BISP  "sSjH  TiSPE  ; 
5y05  V3=FHHV3 
5606  RETUFIH  y 
5693  R=43S 

5010  BISP  TifiTB  set:  i  =  iST.2--:iiv3'  ) 
5615  Fy=FnliF9 

5016  RETURN  0 

5017  R=4S9 

5013  Q=Fr;Fl+FtiF7^FijVi  s 

5819  GOTO  1395 

5620  R=44& 

5022  Q=+ie-5^F7 

5025  Ql=4*r5-S+17*F7' 

5930  LORD     DHIH  #Q*QI«H 

5935  LORD     BfilH  iy.Qjv2??! 

5940  ¥=HTGy 111 

5941  IF  FtO  THEH  5943 

5942  F=7.3 

5943  Q=FHJ2 

5945  FOR  1=1  TO  19 
5050  TE9.  I  1=^r  ;  ~.  :  : 
5055  TC9'  I  +  lij  1  ] 

5969  HEKT  I 

5965  TPHNSFER  T[9?11  TO  Ff 
5070  RETURH  9 
5h75  R=44i 

5039  DISP  "TEHFtF}"; 
5985  B5=FHB2-«-FNN(Bi:3  1^19  5^ 
5990  Hr3]=l@*E:5 
5995  DISP  -HEU  PT<F>  ? 

5199  B€=-NK<fSL4]^-i8> 
5105  fir  4 3=86*10 
5110  RETURH  0 

5130  R=442 

5135  L=Ii[4?2j.  100 

5140  F2=H2=2 

5155  H9=9 

5160  B=FHQL 

5165  FOR  J 1=2  TO  6 

5170  Ki=DtJls5j^l6.667/^ 

5175  K2=Kit2 

5180  p=LnG^ietcDf:ji»6: 

5185  Q=FHGH9 
5190  HEKT  Jl 
5195  Q=FNG<-9> 

5200  W1=-F[2]^FC  1 1^2 
5205  V6=£^iP(K-FE  1  3*tilt2-> 
5210  V=FC 1  ] 

5215  E9=SaRfR2^H9j 
5229  PETUF't  9 
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D  -  REWORK  (cont) 


;"3U  P^--H3 

•  ?A'j  FOP   Jl=:'  TO  0 
'Ir'M  '.i-^-Dl  Jl .    J  lu.  [,; 
■        y.l=E::yyA  ■'■■i..OG0.  5^'  '  \  2:> 

'jGu  p  =  io  p' III  Ji  J  ^  J  u:m  4  ' 

.205  U  =  FNGN9 
'270  WE' 'J  !1 

.230  V0^F[2  1  +  X 
i29S  X1^:FNZH0 

.300  H^.;:'r'-i  .  ::i 

1310  E3  =  3QP(F:2  N3 '6 
=1315  RETURN  0 
3320  R=444 

5321  f1  [  N  3  ?  1]  =  I  N  T '  II  [  4  .  2  ]  ■  ]  0  v  0  _    -101 M  h  / 1  Pi  0 
1322  Z  =  Fl[S]flE-04 

5323  Q=FNV7 

5324  H[H3  5  4]-hL  10]-ie:  -h4 
5 :3  2  5  V\  L  W  £; .  5  ]  --  E  7^  2  *  S 1!  F  ■:  iX\  C  0 .  5  fll  1  ;^  B  ^  6  U 

5326  N[H3?6]-F 

5327  Q5=W1*B.--6C( 

5331  NLHS-  10]=^^H6  +  M7/100 

5332  Q  =  FKS2  +  FNHl+FNr:l  .  FrN-  uiu  -i  f-HrlS  fFir31  ^FNIS 

5333  PRINT  1hB30^"EE9!   FIT   hijR  5  lUFv" 

5334  PRINT 

5335  FORNhT   "REWOFK  FIFE  TfiPE     T  I  TiE  H  ri. ;.     EPF  flPEfl 
5 3 4 0  W R I T E   (  15:5 3 3 5 ;..  "  E i.. E " .:i s       P ON     7. E "I  " 

5345  FORMFlT  F5  .  1  -  F5 .  0  ^  F5  =  0  n  F  1  0 .  3  ^  F9 .  m  "  f.  12 "  ?  F7  .  1  ^  F3  .  2 


1350  NRITE  .::i' 
1355  Q  =  FNS2 


345;..N[  ]  .  10  L.  2^-18  !- 


r;[  4.  4  ].-"ioon,  D9 


Tn..;:K)     SKY  BRIGHT 


'  K"  ^  FiO.  1 1.  F7.  i 

B4?  N[  NS, 1  NF 


5370  N  R  IT  E  a  5  <  2  0  0  O  >  S  $  5  "    -  T  o. 
5375  FORNHT  F2 .  0 ^  PC ,  0  ,  F'^^.  3 .  F9 
5380  NR I TE     1 5  «  5375 )  1 ,  N9 .  DFT 
5335  Q^FNVO 
5450  N[  NS?  2  OirLGTM 
5452  n  [  N  3  J  3  3  - 1 0  *  L.  G  T  (  ...  N  :3  -  2  >  /  7!  1 
5460  Q  =  K  *  S  [  t-l  0 «  4  ]  /  ( '  I '  - 1 .  ■  ■  1 0  0  0 
5463  N[H3j7]  =  V 

5465  N  [  H  3  ?  :3  ]  ^  Q  -  - B  4  +  3  ;.. .- -  B  9  ■  1  .  3  S  054 
5471?  N  [  N  3  ^  9  ]  =  0  ,.■  f(  1  -  3  B  9  ♦  1 .  3  7: 0  7  4 
5430  W  RITE  (15,5 :3  7  5  >  2 1  N  9 ,  ]J  E  T '  C >  E 1 
5485  Q=FNS2 

5490  FORNHT   "  -^HRBN+tl  'r-PHCTOR 
5495  NR  I  TE     1  5 ,  54  i^J:  ■..f,  "         G  ( .JB 
5500  O^NC  HS<  7  ]f  lu-LGTN':'  - 
550  7.  F  0  R  N  fi  T   F-  6 .  7  ^  "  .:J  e  v  <  P'  J  0 .  4  ^  f^'  7' .  2 ,   9 . 


riECL  OFFSET:    " ; 
?F10.4,F9.4' 
E7 '  Z  ?  V6 :  1  00*E9  ?  Q'! 


F6.  2 


Fl  1 


7  ?  ','6  J  1 0O#E9 ?  Q5 

t.:;k>  dt.::" 

G.'T.:dB...  HEP 


K " 


F: 


NOP 


F7. 3,  "kPU' 


4  ]  ■  { 


5510  NRITE  .::  15,  5505  :.N[  N;; 

5515  Q=^FN7l+PNI5^FN7] 

5520  PR  I  NT  1  hB73  <  "  1  On  ^  ■  ]ii  i ;  . .  M  T  ■  -  Nm: 

5525  PORNhT  .  .  lOX.  "CUT  '  -     lu.  0?    !  P24. 

5530  RED  IN  VL 5 1 

5535  FOR  1=^2  TO  6 

5540  :-:2  =  D[  I  ,  5  ]/16,667-  D 

5545  X1^E;:P.::4-LOG0.  5-'7:7:  .i2:' 

5550  Y[  I-l  I^lOO 

5555  fJE;;T  I 

55^.0  NPITE   .:  15,5525 

55l:.5  n-=FN72 

5570  RPIilN  Y[2] 

5572  RETURN  0 


N9 , 0 , NL  NO , 2 ] ?  Ml  NS <  8 ] ^ " FPU " , NT  NS , 

l;T    " ;  SI ;  '  .:. .- TR) " 
,5F9.  2 


10  r  ■  HI  ]  <  cl  ].  10  14: 
,  1-0,  1  ,  2,  Y[ 


I  L  7  j*7:i  +FC 1  ^^y:2+) 

sYl.  7],  "•■7','.T3T,  "• 


YC  4  ]- 


Y[  5  ], 
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D  -  REWORK  (cont) 


5574  R=AA5 

5575  Xl=FHZHy 

5530  FORHfiT  5:N"*!iPBH  tfl    -    ^  h ■      ■  CSC  l  -  .F7'.4.' 

5585  NRITE   (      ^  ^^SOXiC  2  I  ^    j.  HL  >1  -  l:  .1,  t>/6ft?  BO/Fe?  "  >  ' 
5590  Q=FHS1+FNF3 
5595  RETUkH  h 
5600  R^446 

5605  FORMRT  "  SITE  ELEV        "   •   aUr.  water  otln      zenith  ottn" 

5610  WRITE  (15,5605)         -Lt  !-   ^^1     RFFP  ^2  wnt-BIRn" 

5615  FuRHfiT  F7.3r'  ki^i"  .  F      ^,  "  dB".FS.4r'  dB-^dens"  ?  FS.  45  "  dB"  '  F'-.  S^  F10.  4- i 
5620  HRITE   (15?  56 1 5)  CO .  G4-L  4  *  C5*^LS- L6  ?  Zi  ?  L3  ?  LS^  B?  "  ft" 
5622  RETURN  6 

5624  R=447 

5626  FORMRT  "  G'd8>     G-dsrtt     T*:K>       Ta<K>       V-fnc-  hiPBWer^" 

5625  WRITE  (!5:.5626V-     data  i^ix     r.a-K2;'  bright  effRPEfl" 

5630  FORMRT  Ft.  2  ?  F7.  2?  F7.  i   [-3,  1  >  F3.  4^  F7.  2?  "  •r-?F7.3."  dB"  ?  F7=  2?  "•i"  ?  F6.  2.  FS.  1 

5631  WRITE  a5?5630>i0*LGTG.C7?T'H9,  V5B2jHljPl?B4r'  -'.99 

5632  RETURN  O 

5633  R=448 

5634  FORMRT  --.FS.S,  "=H2%F6.2?  "=C:9".F5.  i  s  ■■=D1"  » F5.5.  ••=H<2i  *  1  >  "  »  F5.0  5  2FS.4 
5636  WRITE  <  15  j  5634?R2f  C9*  Dl » hC  £1  ?  t  I.-  "i  \f3r=Jil,  9>"  s  Jr'=Jl" 

5638  FORMRT  F3 .  2  <  ' -33 "  ,  F6>  2;  "^Dy"  « ;        ■   -CS "  5  F9 . 5 ?  F5 . 6 j  FS .  4 ,  "  =02 •' » .•• 

5640  WRITE  •:i5^5633:.'DS.D95C3.HC2l!3:       ;  21  ?  3) ?  Tt  1 5  1 1  ]"=T<  1  <  1 1  >"  «  C2 

5641  RETURH  O 

5642  R=449 

564  4  H9=B3--'  <  HC  2 1  ?  2  3+NC  2 1 »  6  3  >  ?-2*26 1 1  ?y  1  et  <  <  Ht  28 »  2  3+H[  28  5  6  3  >   i  @  > 
5646  RETURN  H9 

5643  R=450 

5650  B=FHQL 

5651  Q=FNK1 

5653  B2=B3 B0*r*F^3035:it2 

5655  C7=10*LGT-;G.  82/ ;3^!^.  8.ol3_'l2) 

5657  B9=2*C 1     . 33854E-23*G 

5658  RETURH  6 
5660  R=451 
5665  F8=l 

5670  IF  Hl  1»  lej-iHTHC  1,  10  J   i>itH  ::.6O0 
5675  F3===0 
5680  RETURH  0 
5690  R^452 
5695  m="" 

5700  FORHfiT  ly  !....■'-■'■■ 

5705  OUTPUT  (Rf  )5700;"% 

5710  RETURri  0 

5S00  R=453 

5310  SERROR  25.5856 

5815  riRT  r1=ZER 

5320  REDIM  YE  2 3 

5325  F4=0 

5330  F6=F5=1 

5:     ^'-Nl  i.  isi 

5;         ■  RD  NC  1>  10  3'F9,i  'f^ni  lO-Z         r?..  G:i.HE  2l52]?H[2:  «6  3?  H3 
5350   IF  N[  1.10  3  <=  Q  THEri  r,.£Mf, 
5352  R0=:hLl.!03 
5355  RETURN  VW-nQ 
5336  Q=FNJ8 

6nyo  REM  l=Rl-iRKft?          ra  31? ;  ^  ::;-r  -  4-  i AiV30 ?  S^csc ?  •^6^rlr'FH.593?  *7=c£C «  ^S^  i  a 
6010  DRTR  12. 2«2j7. 335^0. '1..C^-0-C  J3-^0.  i45H,  1166 
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D  -  REWORK  (cont) 


R  1 


H 

Hi 
R2 

B 


4ri 


48  is 

1 

1 


1- 

4920 


.  fi2Ci  13 -J  J 
■2h;-;  ?2S;-: 


4  347  4 -4-. 3  ■■I:-;-' 3 
35f'4     333U  3b3'1- 


1335     1333  2033 


465 
5133 


473 
5173 


By         1  478  433 


13: 


•  1  ;i  i-'i  ■  I J  b  y  4  J  t>  - 
3;.  3  ^;ij33  531; 
i333     3342  564? 


:yo  4y-iti 


'50  1370  1330 
554  0     5535  5353 


4  33 
:!":i.ui 


;-4-!M  ;-:HM 


4  3  6  0 


4  -i  n      n  '^i  H 


c:  irj  cr 


Bl 
B2 
B3 
B4 
B5 
B6 
B7 
BS 
By 
C 

30 
CI 
C  2 
3  3 
34 
35 
C:  6 
37 
CS 
C  3 

Ti 

no 

HI 


1313  1333  4353  4345  4353 

1040  4910  4920  5655  5655 

1040  4920  5644  5353 

460  4602  5350  5465.  5631 

55  3334  5335  5390 

60  3336  5133  5135 


4602 
630 

4  00 

560 
4  0  0 ' 


■:63l 


4  4  1  5  3 -J 'd  ■:>  4 1;:.  b 
>;413     4  333  4930 

4903     4915  5657 


4005 


54  70  5631 


4602     4650  5640 


330  5636 

690  4313     4  923 

4  9  3  5 

790  5i::,2h 


;.3,;'ii 
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D  -  REWORK  (cont) 


D2 

-••J 

-'  ■  ■ 

D3 

464  5 

D4 

D5 
DS 

- 

.-.  " 

O  O  J 

5640 

119 

840 

5640 

E 

4335 

4  650 

3350 

i  3  .V  0 

9  9  0 

4005 

4005 

4005 

4oiO 

-i  155 

E0 

V 

740 

4360 

4650 

El 

745 

1305 

1830 

4368 

4650 

E2 

2 

790 

4360 

4650 

E3 

795 

4360 

4650 

E4 

800 

4360 

4650 

E5 

310 

1666 

1330 

1950 

2050 

2120 

4360 

4650 

Eb 

815 

2110 

2130 

2135 

2290 

4350 

4650 

E7 

S3S 

2120 

2130 

2255 

2290 

4350 

4653 

■_>825 

5330 

5480 

ES 

c 

1742 

1950 

2050 

2120 

4360 

4653 

E9 

340 

4357 

4650 

5215 

5310 

5330 

5480 

F 

690 

4910 

5655 

64 

795 

4920 

390 

1725 

4940 

390 

1730 

-1950 

3  9  0 

3026 

4950 

415 

3690 

4-55 

415 

3136 

5040 

430 

3133 

5041 

530 

4335 

5042 

525 
4900 
5  2'  2  6 

525\ 

4905- 

5553 

F0 

4955 

Fl 

2470 

1444 

1835 

1 900 

1955 

1960 

1965 

2158 

2170 

226S 

2450V 

F2 

V 

3990 
4530 
4845 

975 
: 9  ~' 
4580 
4845 

1155 
399b 
4535 
5140 

1655 
3995 
4585 

3130 
3':^95 
4600 

3615 
-i240 

d60O 

3630 
4550 
4615 

3915 
4568 
4615 

3915 
4575 
4340 

3?  15. 
4573: 
434:5- 

.391:5 
■43^15:: 

F3 

61 

1710 

IT'20 

58'T-5 

F4 

1665 

1665 

16/5 

2975 

5825 

F5 

62 

3125 

31  12 

1  y. 

:.o3e 

Ft'. 

1409 

3135 

3217 

3  ■ -■  ;-; 

3620 

4215 

5330 

F7 

61 

1675 

3  630 

2975 

2975 

3055 

5050  _ 

4^95 

5^22. 

50jJ5  • 

FS 

1639 

1  745 

5665 

5675 

F9 

62 

930 

3060 

^  303'0 

5015 

5015 

5025 

584  5- 

b 

■J 

5657 

820 

935 

1075 

-.615 

4617 

4910 

4915 

56ai 

r       LT  c- 
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D  -  REWORK  (cont) 


G4 

4  8  0 

440 

5620 

G5 

420 

4  40 

5^  6  2  0 

be- 

A  ■*.'  Li 
H  ■.'  U 

J  t'  J.,  u 

H 

3 

1655 

HI 

&ly 

4  575 

4573 

5. -.31 

H5 

3 

Hy 

- 

61 

9  ?U 

1075 

1375 

1940 

2040 

25 

20 

3  028: 

c:;  -1 1 

50 

■J  u  u 

R  ^  1  L*H 
-.1  J  1  U 

5  5 1  y 

ci.    -  J  1 

J  •;■  -! 't 

j  o  4 1' 

-1    4  J 

I 

2  8  y 

29  0 

/  ';j5 

7  J  0 

720 

107'0 

1  095 

i  1 

1115 

1  1  , 

20 

y  -I" 

3  t.i  4  y 

3  0  4  0 

3 1'j  4  5 

-"'  0  4  5 

;  y  5  0 

■i  ■:■  i.i  0 

V}  .J 

1  y 

-j  11: 

3  3  3y 

3340 

.; '  J  5i  5 

'   ^1  s 

c::  L7 
-'•      J  J 

■~j   ,  c-  cr 

60 

3 :3  6  0 

40 

3445 

3445 

3450 

3455 

3  460 

.::465 

3  4  8  0 

3510 

10 

■3  7  i  5 

20 

37£fi 

3750 

■  ■-,  -?  V.'  L,; 

;-;  7 

:?760 

3310 

3820 

33 

20 

3825 

3  3 : 

30 

-i  .-1  ri  Cj 

4925 

4  '430 

4  ?35 

4  9  3  5 

4  940 

494  0 

40 

4945 

4.  ■■'•1 . 

.1  cr 
^  r 

4945 

4950 

4950 

4'::^50 

4  ?■  'j  ti 

4  960 

4-60 

4  9  6  5< 

4 

70 

49  75 

50 

45 

5056 

5050 

5055 

5055 

5060 

5535 

5540 

5550 

55 

~j  0 

5555 

15 

9  9  5 

1  005 

1  1  45 

1  1  65 

i-  ■'■  6  0 

3665 

J  6  9  0 

36 

90 

3755 

70 

■"'  C'  Q  c; 

■I'   ■-'  y 

1  r-  i  ri 

4  "I 

■'■  cr 
.  1 

"T t'  y 

J 

2560 

3  4  3  5 

3455 

80 

■  J  ~  j  y  y 

._"!  -  J  ifi  .™i 

■  -■  '"-I  ^  M 

~  /  'i'  y 

0  CTj  0 

3  ■=!  4  fi 

■'j  cr 

3635 

3640 

3640 

3650 

3  6  b  5 

3915 

15 

3  9  9  0 

95 

I- j  y  y 

•-f  y  'J  y 

4  IJ  ^■■'ii' 

4  4- 

M  H-  ■-. 

•-j  L".j 

4435 

4  435 

■"r  T 

4435 

4h4  0 

.1445 

4  450 

4  455 

44 

cr  C- 

4  495 

4  5 

00 

4  s  fl  n 

l1      1  Li 

■■t  .1  i  M 

H-  LJ 

A  ^,  S 

"■T      L_  -J 

'■t  -J'  y 

■  i  S  ri 

T  ...1  T 

4576 

4576 

4  ~5  7  8 

4  6yy 

4  600 

4602 

^' 

4835 

■"'  s 

M-  O     -  J 

4-  J 

4  o  4  -ii 

■■1 4  **" ' 

J  1 

5  ■ 5 

■  Ci 

i  t'  J 

cr  1  "  i~i 

■J  J- 

C'  |/| 

rr 

J  S 

5250 

5260 

5  70 

5  6  3  6 

K 

3 

550 

cr  c"^  L- 

1040 

1075 

5  4  6  0 

Kl 

455 

460 

5  'j  0 

„.,, 

300 

1  040 

5470 

3 

490 

550 

7  9  0 

3  0  0 

1  y40 

K3 

3 

495 

550 

1040 

K4 

3 

505 

550 

K5 

.  3 

5.05 

550 

KG 

3 

505 

550 

1  040 

K7 

3 

505 

550 

K8 

3 

530 

550 

900 

335 

1040 

K9 

545 

550 

7: 0  0 

840 

i  040 

L6 

4 

C> 

3610 

4370 

LI 

4 

1655 

3  3  3  0 

334  0 

3  3  9  0 

3900 

3900 

1 1 5 

3915 

'  -\ 

L4 

4 

4  10 

4  4  0 

5620 

L5 

4 

425 

440 

5  6  2  0 
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D  -  REWORK  Ccont) 


Lb 

A 

ii  ■ -'  ^ 

T  .J  J 

A  18 

5620 

1  7 

4 

-1 ,-.  r- 

.■1, 1 

r  J  ■„" 

lI  ''C\ 
H  .  ■  U 

"-f  '-I-  ._! 

C'  '"'i  C'i 

i,j 

LS 

4 

4  45 

5  6  2  0 

L9 

4 

450 

535 

5620 

ri 

4 

3410 

4535 

4  C 1 0 

4  6 

10 

4  8  1  7 

4880 

5  3  6  0 

5480 

Ml 

4 

1270 

1  280 

1288 

13 

30 

1345 

1366 

1890 

2445 

2480 

2495 

25  1  5 

4525 

M  ■ 

,1 
't 

1       ~^  M 

1  L.O-J 

1 

•   4  ^-^ 

1       ^'  Ti 

■~;  c;  r'  i"l 
il  -J:  -.J  tJ 

2  9  b  L"_' 

4 

M3 

4 

1270 

1  290 

1290 

1  '3 

3  0 

1  835 

1 365 

1 366 

4  4'  9  8 

4  J"  'i  0  0 

5290 

5452 

H 

4 

1743 

1 760 

1 760 

7  0 

1  -J  --■  r- 

1 8S0 

HO 

.■1 

485 

8 1. 

880 

7'  "i  ri 

8  0  0 

C;  1 

1H14H 

1040 

1075 

1 7  0  0 

17 

4  2 

1845 

1875 

3135 

8  8  8  2 

4 

4  640 

V  9  5 

5321 

5332 
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The  Earth  Terminal  Measurement  System  (ETMS)  was  developed  by 
the  National  Bureau  of  Standards  to  make  accurate  measurements  of 
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that  it  is  largely  independent  of  frequency  and  antenna  elevation 
angle.     Thus,  it  is  easier  to  evaluate  the  "reasonableness"  of  a 
particular  set  of  results  in  light  of  the  other  results  taken  at 
various  frequencies  and  elevation  angles.     This  manual  includes  the 
theory  of  the  measurements,  measurement  procedures,  measurement 
troubleshooting,  interpretation  of  the  results,  and  a  discussion  of 
the  ETMS  software. 
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